R_tempfile のバックアップ(No.1) - アールメカブ

アールメカブ


R_tempfile のバックアップ(No.1)


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 だとちゃんと書き込めない.次のようにする必要がある.
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)

で,掃除する.