アールメカブ

• バックアップ一覧
• 差分 を表示
• 現在との差分 を表示
• バックアップ を表示
• R_sample へ行く。
  • 1 (2008-12-03 (水) 13:45:47)

[[Rの備忘録]]

被験者が二つの質問に解答しているとして、ある被験者からは質問Q1を抽出し、残りの被験者からは質問Q2を、ランダムに取り出したいとする。

もっと簡単な方法があった気がするんだが。。。

 データからランダムに被験者を取り出しやすいようにIDを設定
 dat$id <-  1: nrow(dat)
 my.sample <- sample(1:nrow(dat), nrow(dat)/2)
 dat.A  <- dat[dat$id  %in% my.sample,  c("E1W2", "Sex", "Q1")]
 colnames(dat.A) <- c("E1W2", "Sex", "Q")
 dat.B <- dat[!(dat$id  %in% my.sample),  c("E1W2", "Sex", "Q2")]
 colnames(dat.B) <- c("E1W2", "Sex", "Q")
 dat.all <- rbind(dat.A, dat.B)