myscratchpad

RjpwikiのTipsより。感謝。

文字+番号
paste("Sbj_", 1:10, sep = "")
[1] "Sbj_1"  "Sbj_2"  "Sbj_3"  "Sbj_4"  "Sbj_5"  "Sbj_6"  "Sbj_7"  "Sbj_8"  "Sbj_9"  "Sbj_10"

文字列の分解
x <- paste("Sbj_", 1:10, sep = "")
strsplit(x, "_")
# ベクトルにする
unlist(strsplit(x, "_"))
# データフレームにする
data.frame(strsplit(x, "_"))
## 一部を取り出す
data.frame(strsplit(x, "_"))[2,]

全部数値ならdim(...) でもできる

ついでにメモ
rep(1:3, times = 3) # 1,2,3を3回繰り返す。rep(1:3, 3) も同じ
[1] 1 2 3 1 2 3 1 2 3
rep(1:3, each = 3) # それぞれを3回くりかえす
[1] 1 1 1 2 2 2 3 3 3
## 繰り返しは要素ごとに指定もできる
rep(1:3, times = c(3, 2, 5))
 [1] 1 1 1 2 2 3 3 3 3 3