如果您不仅限于base功能,您可以尝试readr::format_csv.
library(readr)
format_csv(iris[1:2, 1:3])
# [1] "Sepal.Length,Sepal.Width,Petal.Length\n5.1,3.5,1.4\n4.9,3.0,1.4\n"
Run Code Online (Sandbox Code Playgroud)
如果你想要一个csv格式的单个字符串,你可以从中捕获输出write.csv.
我们mtcars以一个例子为例:
paste(capture.output(write.csv(mtcars)), collapse = "\n")
Run Code Online (Sandbox Code Playgroud)
这读回R精细read.csv(text = ..., row.names = 1).您可以调整行名称和其他属性的打印write.csv.