忍者ブログ
×

[PR]上記の広告は3ヶ月以上新規記事投稿のないブログに表示されています。新しい記事を書く事で広告が消えます。

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
PR
Comment
Trackback
Trackback URL

Comment form
Title
Color & Icon Vodafone絵文字 i-mode絵文字 Ezweb絵文字  
Comment
Name
Mail
URL
Password
プロフィール
HN:
tao
HP:
性別:
非公開
職業:
会社員
趣味:
アウトドア、自転車、ジョギング、英語学習
自己紹介:
・千葉在住のサラリーマンです。データ分析っぽいことが仕事。
・今年英検1級取得。今はTOEIC高得点を目指して勉強中。
・興味のあることは野球、アウトドア、英語学習、統計、プログラミング、PC関係などなど。
ブログ内検索
freead
順位表
プロ野球データFreak
セリーグ順位表
パリーグ順位表