如何为前10个数字编写具有特定间隔的函数，然后为第二个10个数字编写新的间隔，依此类推，使用R

# 定义函数，参数为数字列表和间隔
generate_sequence <- function(numbers, interval) {
  result <- c()  # 创建一个空的向量用于存储结果
  
  for (i in 1:length(numbers)) {
    if (i %% interval == 0) {
      result <- c(result, numbers[i])  # 将符合间隔条件的数字添加到结果中
    }
  }
  
  return(result)
}

# 调用函数生成前10个数字的间隔为2的序列
numbers <- 1:10
interval <- 2
sequence <- generate_sequence(numbers, interval)
print(sequence)

# 生成第二个10个数字的新间隔
numbers <- 11:20
interval <- 3
sequence <- generate_sequence(numbers, interval)
print(sequence)