如何在R中循环包含数据帧的子集的函数？

# 定义一个函数，用于循环处理包含数据帧的子集
process_subsets <- function(data, subset_size) {
  # 获取数据帧的总行数
  total_rows <- nrow(data)
  
  # 计算子集的个数
  num_subsets <- ceiling(total_rows / subset_size)
  
  # 循环处理子集
  for (i in 1:num_subsets) {
    # 计算子集的起始和结束行索引
    start_index <- (i - 1) * subset_size + 1
    end_index <- min(i * subset_size, total_rows)
    
    # 提取子集
    subset <- data[start_index:end_index, ]
    
    # 在这里进行子集的处理操作
    # ...
    
    # 打印子集的摘要信息
    cat("Subset", i, ":", start_index, "-", end_index, "\n")
    print(subset)
  }
}

# 示例用法
# 创建一个包含数据的数据帧
data <- data.frame(
  x = 1:10,
  y = letters[1:10]
)

# 调用函数，指定子集大小为3
process_subsets(data, 3)