在R中将列表元素与所属名称按列关联并导出为txt/csv/xlsx文件

你可以通过以下两种常用方案完成列表转两列数据框的需求，解决unlist无法直接输出准确分组名的问题： #

前置：示例列表构造 #

先构造和你示例一致的列表用于测试：

my_list <- list(
  obj1 = c(1,2,3,4,5),
  obj2 = "XYZ",
  obj3 = c("g","f","e","d")
)

方法1：基础R实现（无需安装额外依赖） #

使用R内置的stack()函数即可直接完成命名列表到两列数据框的转换：

# 转换为两列数据框，默认第一列为列表值，第二列为对应分组名
result_df <- stack(my_list)
# 自定义列名
colnames(result_df) <- c("值", "所属分组")

方法2：tidyverse生态实现（适配tidy语法习惯） #

适合日常使用tidyverse工具链的用户：

# 首次使用先安装依赖
# install.packages("tidyverse")
library(tidyverse)

result_df <- enframe(my_list, name = "所属分组", value = "值") %>% 
  unnest(cols = c(值))

导出为目标格式 #

导出TXT格式 #

write.table(result_df, "output.txt", sep = "\t", row.names = FALSE, quote = FALSE, fileEncoding = "UTF-8")

导出CSV格式 #

write.csv(result_df, "output.csv", row.names = FALSE, fileEncoding = "UTF-8")

导出XLSX格式 #

使用轻量无Java依赖的writexl包实现：

# 首次使用先安装依赖
# install.packages("writexl")
library(writexl)

write_xlsx(result_df, "output.xlsx")

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