アールメカブ

• 追加された行はこの色です。
• 削除された行はこの色です。
• R_tempfile へ行く。
• R_tempfile の差分を削除

[[Rの備忘録]]

こういう処理をよく行うのだが
 ## ######## 一時ファイルで実験する場合
 td <- tempfile()
 dir.create(td)
  for(i in 1: nrow(wine00)){
  write( as.character(wine00[i, "PC"]), 
    file = paste(td, paste("D", i, sep=""), sep="/"))
  }

Windows の場合，XP は大丈夫だが，Vista だとちゃんと書き込めない．次のようにする必要がある．
Windows の場合，XP は大丈夫だが，Vista だとちゃんと書き込めない．次のようにする必要があるのかもしれないし，別に気をつけないで良いのかもしれない．いずれにせよ，コードに日本語が含まれている場合は，全コードを範囲指定して反転させて，その上で実行する必要がある．

 td <- tempfile()
 dir.create(td)
  for(i in 1: nrow(wine00)){
  write( as.character(wine00[i, "PC"]), 
    file = paste(td, paste("D", i, sep=""), sep="\\"))
  }

最後に
 unlink(td, recursive = TRUE)
で，掃除する．