如何将含列表的R DataFrame转换为含字符串的DataFrame？

针对你给出的含列表类型列的DataFrame，这里有几种实用方法可以将每个列表元素合并为字符串：

方法1：使用tidyverse工具链（dplyr + purrr） #

如果你习惯用tidyverse生态，这种方法代码简洁易读：

library(dplyr)
library(purrr)

# 处理所有列，将列表元素合并为逗号分隔的字符串
df_processed <- df %>%
  mutate(across(everything(), ~map_chr(., paste, collapse = ", ")))

across(everything())遍历DataFrame的所有列，map_chr对每个列中的列表元素执行paste操作，collapse参数用来指定元素间的分隔符（这里用逗号加空格，你可以改成空格、分号等任意符号）。

方法2：Base R原生方法（无需额外包） #

如果不想加载第三方包，用Base R的原生函数组合也能实现：

# 遍历每一列，将列表元素合并为字符串
df_processed_base <- as.data.frame(lapply(df, function(col) {
  sapply(col, function(x) paste(x, collapse = ", "))
}))

外层lapply处理每一列，内层sapply针对列中的每个列表元素完成字符串合并，最后转成DataFrame格式。

处理后的结果示例 #

运行上述代码后，你的DataFrame会变为：

内容的提问来源于stack exchange，提问作者ThomasW