将 xlsx 文件从表中导出为单独的过滤列

【问题标题】：Export xlsx files from table as seperated filtered column将 xlsx 文件从表中导出为单独的过滤列
【发布时间】：2020-08-20 09:15:30
【问题描述】：

我有一个数据集 df

aa1  bb1  ccc
aa2  bb2  ccc
aa3  bb3  ddd
aa4  bb4  ddd
aa5  bb5  eee

我想导出为 xlsx 文件，每个文件都分隔过滤列

write.xlsx(df, 'files(ccc,ddd,eee,...).xlsx')

ccc.xlsx 的输出

aa1  bb1  ccc
aa2  bb2  ccc

ddd.xlsx 的输出

aa3  bb3  ddd
aa4  bb4  ddd

eee.xls 的输出

aa5  bb5  eee

谢谢

【问题讨论】：

标签： r excel dataframe export openxlsx

【解决方案1】：

类似的东西应该可以工作：

files <- unique(df$V3) # Or manually files <- c("ccc", "ddd", "eee")
for (f in files) {
  write.xlsx(df[df$V3 == f, ], paste0(f, ".xlsx"))
}

数据

df <- data.frame(
  V1 = c("aa1", "aa2", "aa3", "aa4", "aa5"), 
  V2 = c("bb1", "bb2", "bb3", "bb4", "bb5"), 
  V3 = c("ccc", "ccc", "ddd", "ddd", "eee")
)

【讨论】：

也许files <- unique(df$V3) 让它更通用。
谢谢@maydin，我把它加进去了。