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

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

  •  6
  • Marcin  · 技术社区  · 10 年前

    我正在尝试在已存在的 .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 回复  |  直到 10 年前
        1
  •  5
  •   Carl Witthoft    10 年前

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

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

        2
  •  2
  •   rafa.pereira    9 年前

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

    sink("outfile.txt", append = T)
    
    x <- as.character(max(cumsum( rnorm( 10^7))))
    writeLines(x)
    
    sink()
    
        3
  •  0
  •   Fabio    10 年前

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

    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”文件中找到这两个值