将数据帧分割成相等的部分

Question

我有一个示例数据框：

df <- data.frame(x = 1:112, y = runif(112))

有没有办法打印一个数据帧列表，列表的第一部分包含行1:10，第二个11:20，等等，直到结束(111:112)？

Answer 1

您可以结合使用split()和rep()来创建分组。

n <- 10
nr <- nrow(df)
split(df, rep(1:ceiling(nr/n), each=n, length.out=nr))

Answer 2

这可以通过使用tidyr/dplyr嵌套来解决

require(dplyr) 
require(tidyr)

num_groups = 10

iris %>% 
   group_by((row_number()-1) %/% (n()/num_groups)) %>%
   nest %>% pull(data)