在R脚本语言中,如何编写行文本,例如,下面两行
Hello
World
到一个名为output.txt的文件?
在R脚本语言中,如何编写行文本,例如,下面两行
Hello
World
到一个名为output.txt的文件?
当前回答
fileConn<-file("output.txt")
writeLines(c("Hello","World"), fileConn)
close(fileConn)
其他回答
一个简单的writeLines()是什么?
txt <- "Hallo\nWorld"
writeLines(txt, "outfile.txt")
or
txt <- c("Hallo", "World")
writeLines(txt, "outfile.txt")
在R的新版本中,writeLines将保留文本中的返回值和空格,因此您不需要在行末包含\n,并且可以将一大块文本写入文件。这个例子也适用,
txt <- "Hello
World"
fileConn<-file("output.txt")
writeLines(txt, fileConn)
close(fileConn)
但是您也可以使用此设置简单地包含具有结构的文本(换行或缩进)
txt <- "Hello
world
I can
indent text!"
fileConn<-file("output.txt")
writeLines(txt, fileConn)
close(fileConn)
你可以用一个语句来做
cat("hello","world",file="output.txt",sep="\n",append=TRUE)
根据最佳答案:
file <- file("test.txt")
writeLines(yourObject, file)
close(file)
注意,youobject需要是字符串格式;如果需要,使用as.character()进行转换。
但是对于每次保存尝试来说,输入太多了。让我们在RStudio中创建一个代码片段。
在Global Options >> Code >> Snippet中,键入以下内容:
snippet wfile
file <- file(${1:filename})
writeLines(${2:yourObject}, file)
close(file)
然后,在编码过程中,输入wfile并按Tab键。
丑陋的系统选项
ptf <- function (txtToPrint,outFile){system(paste(paste(paste("echo '",cat(txtToPrint),sep = "",collapse = NULL),"'>",sep = "",collapse = NULL),outFile))}
#Prints txtToPrint to outFile in cwd. #!/bin/bash echo txtToPrint > outFile