将数据框转换为一个元胞向量

Question

我想将数据框中的列转换为一个单元格。

目前我得到以下信息：

beruf <- c(" 2", " 3", " 5", NA, "aa", "bb", "cc", NA)
contact <- c(" 2", NA, NA, NA, "aa", NA, "ccda", NA)

beruf     <- as.vector(as.matrix(beruf))
contact     <- as.vector(as.matrix(contact))

# append to data frame
df.buffer <- data.frame(as(beruf, "character"), as(contact, "character"))

我的输出是这样的：

但是，我想得到以下信息：

任何建议如何获得所需的输出？

我感谢您的回复！

Answer 1

您可以在base尝试：

sapply(df.buffer, paste, collapse = ",")

或者在data.table更长data.table ：

setDT(df.buffer)[,lapply(.SD, paste, collapse = ",")]