代码之家 › 专栏 › 技术社区 › Marcin

在写入函数[R]中追加文本

overwrite append r

6

Marcin · 技术社区 · 11 年前

我正在尝试在已存在的 .txt 文件但我的语法会覆盖此文件:(

   fileConn <- file( "realization1.txt" )
      write(x =as.character(max(cumsum( rnorm( 10^7)))),
            file = fileConn,
            append = TRUE, sep = " ")


      write(x =as.character(max(cumsum( rnorm( 10^7)))),
            file = fileConn,
            append = TRUE, sep = " ")
   }

   close( fileConn )

有人能解决这个问题吗? 谢谢你的帮助!

3 回复 | 直到 11 年前

1

5

Carl Witthoft 11 年前

我相信你的困难来自于无法打开设置了正确属性的文件。

如果使用创建连接 fileConn <- file( "realization1.txt" ,open="a") ,那么一切都会如你所愿。基本上,据我所知, write (它是 cat )除非打开文件连接时允许“追加”,否则无法追加。

2

rafa.pereira 10 年前

您也可以使用 writeLines ,大约比 write 。如果要附加大字符串,这会有很大的不同。

sink("outfile.txt", append = T)

x <- as.character(max(cumsum( rnorm( 10^7))))
writeLines(x)

sink()

3

0

Fabio 11 年前

我只需要使用命令 可写表格

write.table(max(cumsum( rnorm( 10^7))),file="realization1.txt",append=TRUE,row.names=FALSE,col.names=FALSE)

write.table(max(cumsum( rnorm( 10^7))),file="realization1.txt",append=TRUE,row.names=FALSE,col.names=FALSE)

您将在“implementation1.txt”文件中找到这两个值