替换文本文件中的第n行

Question

如何更换R中文本文件的第n行？

Answer 1

要替换第三行:

$ cat junk.txt
sic transit
gloria mundi
temeo danoas
et dona ferentes

做这个:

> latin = readLines("junk.txt",-1)
> latin[3]="per ardua ad astra"
> writeLines(latin,"junkout.txt")

得到:

$ cat junkout.txt 
sic transit
gloria mundi
per ardua ad astra
et dona ferentes

如果需要writeLines(latin,"junk.txt"),您可以覆盖输入文件.