在 writeLines 中将一些元素放在一起

Question

我想使用writeLines() 编写一组字符向量来分隔未格式化文本文件中的行。但是，有些向量有多个元素，而有些则没有。示例：

a <- "string 1"
b <- "string 2"
c <- c("string 3a","string 3b","string 3c")

使用writeLines() 给出：

> writeLines(c(a,b,c))
string 1
string 2
string 3a
string 3b
string 3c

而我想看看：

string 1
string 2
string 3a, string 3b, string 3c

有没有简单的方法来做到这一点？

Answer 1

你可以使用toString

writeLines(sapply(list(a, b, c), toString))
#string 1
#string 2
#string 3a, string 3b, string 3c