假设数据框的名称为df,行名存储在row_names中,则可以使用combn函数对每一列进行组合求和,并将结果与行名对应起来,代码如下:

# 数据框
df <- data.frame(matrix(rnorm(52), nrow = 13))

# 行名
row_names <- c('A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K', 'L', 'M')

# 选择的列数
selected_cols <- 3:13

# 通过combn函数进行组合求和
result <- apply(combn(selected_cols, 3), 2, function(cols) {
  # 提取对应的列
  selected_data <- df[, cols]
  # 求和
  sums <- rowSums(selected_data)
  # 组合结果
  result <- data.frame(row_name = row_names, sum = sums)
  return(result)
})

# 打印结果
print(result)

运行以上代码,即可得到每一列选取3到13个对象组合求和的结果,并且显示了对应的行名与求和的数值。


原文地址: https://www.cveoy.top/t/topic/p4nW 著作权归作者所有。请勿转载和采集!

免费AI点我,无需注册和登录