r - 根据因子的级别将 data.frame 拆分为新的 data.frames

Question

我正在尝试创建单独的 data.frame基于因子水平的对象。所以如果我有:

df <- data.frame(
  x=rnorm(25),
  y=rnorm(25),
  g=rep(factor(LETTERS[1:5]), 5)
)

如何拆分 df分成单独的 data.frame s 代表 g 的每个级别包含相应的 x和 y值(value)观？我可以使用 split(df, df$g) 到达那里的大部分路线，但我希望因子的每个级别都有自己的 data.frame .

做到这一点的最佳方法是什么？

Answer 1

我认为split做你想要的。

请注意，X 是一个数据框列表，如 str 所示。 :

X <- split(df, df$g)
str(X)

如果您想要具有组 g 名称的单个对象，您可以从 split 分配 X 的元素到这些名称的对象，虽然这似乎是额外的工作，当您可以从列表中索引数据框 split创造。

#I used lapply just to drop the third column g which is no longer needed.
Y <- lapply(seq_along(X), function(x) as.data.frame(X[[x]])[, 1:2]) 

#Assign the dataframes in the list Y to individual objects
A <- Y[[1]]
B <- Y[[2]]
C <- Y[[3]]
D <- Y[[4]]
E <- Y[[5]]

#Or use lapply with assign to assign each piece to an object all at once
lapply(seq_along(Y), function(x) {
    assign(c("A", "B", "C", "D", "E")[x], Y[[x]], envir=.GlobalEnv)
    }
)

编辑 甚至比使用 lapply 更好分配给全局环境使用 list2env :

names(Y) <- c("A", "B", "C", "D", "E")
list2env(Y, envir = .GlobalEnv)
A