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

我有一个示例数据框：

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

df您可以使用
split（）
和
rep（）
来创建分组

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

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

require(dplyr) 
require(tidyr)

num_groups = 10

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

我将如何编写一个代码，使其以迭代方式将10个块中的每个块保存为一个csv文件，每个块都有一个唯一的文件名？