数値データをファイルに保存する

Question

膨大な量のデータを生成していますが、実行中に選択した値のみを保存したいとします。しかし、それは常に最後の結果を保存します。たとえば、次のサンプルコードでは、常に自分の条件を満たす最後の結果を格納します。巨大なデータがあり、ベクターやリストに保存したくないのですが、すぐにファイルに保存したいと思います。あなたの助けが必要です。

ありがとうございました。

f<-function(x) (x-1)*(x-5)*(x-10) 

fileE<-file("E.txt") 
for (i in seq(1,100,0.1)){ 
    if (f(i) > 0 && f(i) < 10) 
     writeLines(paste0(i," ",f(i)), fileE) 
} 
close(fileE) 

Answer 1

たぶんAPPENDでwriteを使用します。

unlink("E.txt") 

for (i in seq(1, 100, 0.1)){ 
    res <- f(i) 
    if (res > 0 & res < 10) 
    write(x = paste0(i, " ", res), file = "E.txt", append = TRUE) 
    }