rをテキストファイルとして独立して保存する

Question

各行に異なるテキストを含む列を持つ.csvファイルがあります。一例として、 ：

テキスト

愛、それは見え方。価格のためによかった。私はそれがフロントカバー も持っていたと思います。

これは素晴らしいケースです。色はサイトに当てはまり、とても頑丈です。

私は私がコードにしようとしているが、これらのテキストの行の一つ一つを保存するためのループである私は、白のiPhone 3G Sを持っているので、このケースを注文し、バック

に傷の少し独立した.txtファイル（write.tableを使用して、私は推測する）。

つまり、テキストが異なる1,000行がある場合は、1,000個の独立した.txtファイルが必要です。

Answer 1

は混乱のように聞こえるが、なぜだけでなく：

inp <- readLines(file= ..filename..) 
setwd(..path_to_dir..) 
for (i in seq(length(inp)){ cat(inp[i], file=paste0(i, ".txt")) }