アールメカブ

• バックアップ一覧
• 現在との差分 を表示
• ソース を表示
• バックアップ を表示
• R_文字を要素とするベクトルを結合する へ行く。
  • 1 (2008-10-09 (木) 16:42:13)

• 追加された行はこの色です。
• 削除された行はこの色です。

[[Rの備忘録]]

ソースファイルにc()関数で記述されたデータ data.txt がある場合
 source("data.txt")
とすると，ファイル内のコードが実行されるのだが，仮にdata.txt 
に代入式がなければ，オブジェクトは作成されない．
仮に data.txt の中身が

 list(

  x11 = c(0,0,0,0,0,0,0,1,1,1,1,1,1,1),

  x12 = c(1,0,0,0,0,0,0,1,0,0,0,0,0,0),

  x13 = c(0,1,0,0,0,0,0,0,1,0,0,0,0,0) 
)

とする．とりあえず次のように実行したのだが，絶対もっと簡単な方法あるはずだな．

 data.txt <- readLines("data.txt" )
 # ここまでファイルの各行が要素となったベクトルが生成
 data.txt <- paste(data.txt, collapse = " ")
 # ベクトルを一つの文字列にまとめてしまい
 d <- eval( parse(text = data.txt) )
 # parse() 関数を使って文字列をRの式に変換して実行