替换文本文件中的第 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")并根据需要覆盖输入文件。