R语言计算数据框每列数据组合求和 | 3-13个元素组合

在R语言中，可以使用循环和组合函数'combn()'来实现对每列数据的3-13个组合的求和。以下是实现的代码：

# 创建一个包含13行4列的数据框
data <- data.frame(
  col1 = c(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13),
  col2 = c(2, 4, 6, 8, 10, 12, 14, 16, 18, 20, 22, 24, 26),
  col3 = c(3, 6, 9, 12, 15, 18, 21, 24, 27, 30, 33, 36, 39),
  col4 = c(4, 8, 12, 16, 20, 24, 28, 32, 36, 40, 44, 48, 52)
)

# 计算每列数据的3-13个组合的求和
result <- data.frame()
for (col in 1:ncol(data)) {
  col_combinations <- combn(data[, col], 3:13, FUN = sum)
  result <- cbind(result, col_combinations)
}

# 输出结果
result

这段代码会计算每列数据的3-13个组合的求和，并将结果存储在一个新的数据框中。