如何在R中导出列拆分数据帧的子集？

我需要导出数据帧的两个子集，如下所示：

df <- data.frame(factor = c("A", "A", "B", "B"), var = "value")

df
  factor   var
1      A value
2      A value
3      B value
4      B value

---

谢谢你的帮助

一个选项是

split

，然后使用

imap

split

给出了

列表

和“因子”

级别的名称

，使用

imap

，

.y

将获得每个

列表

元素的名称，这些元素可以是

粘贴

d（

Stru c

-做同样的事情，但需要更多的检查）

你能做到：

dfa = df[df$factor == "A",]

dfb = df[df$factor == "B",]

write.csv(dfa,"Name Out A.csv")

write.csv(dfb,"Name Out B.csv")

---

您可以使用

sapply

循环查看由

group\u split

创建的

数据帧列表：

库（dplyr）
df%>%
分组（系数）%>%
sapply（，函数（x）
write.csv（x，file=paste0（“df”，唯一（x$factor），“.csv”））

library(purrr)
library(stringr)
split(df, df$factor) %>%
   imap(~ write.csv(.x, file = str_c('df', .y, '.csv'), quote = FALSE)

dfa = df[df$factor == "A",]

dfb = df[df$factor == "B",]

write.csv(dfa,"Name Out A.csv")

write.csv(dfb,"Name Out B.csv")