如何计算R数据集变量的所有不同长度组合数量

场景1：仅计算组合总数量 #

如果只需要得到总组合数，直接用组合数公式计算即可：
6个变量从2个到6个的组合数总和 = 所有子集总数 - 空集数 - 单变量组合数 = 2^6 - 1 - 6 = 57。

场景2：用R代码生成所有组合同时统计数量 #

如果需要后续对每个变量组合做进一步分析，可以用R内置的combn函数实现，该函数生成的是不考虑顺序的变量组合，不会出现Var1Var2和Var2Var1这类重复计数的情况，符合常规变量组合的统计需求：

# 提取数据集所有变量名
vars <- names(DF)

# 生成2到6个变量的所有组合列表
all_combs <- lapply(2:length(vars), function(k) {
  combn(vars, k, simplify = FALSE)
})

# 统计总组合数
total_comb_num <- sum(sapply(all_combs, length))
print(total_comb_num) # 输出结果为57

# 查看不同变量数对应的组合数量
k_count <- setNames(sapply(all_combs, length), paste0(2:6, "变量组合数"))
print(k_count)

运行结果示例： #

2变量组合数 3变量组合数 4变量组合数 5变量组合数 6变量组合数 
         15          20          15           6           1 

如果需要提取所有组合的具体变量名，可以直接展开列表：

comb_names <- unlist(all_combs, recursive = FALSE)
# 查看前3个2变量组合示例
head(comb_names, 3)

运行结果：

[[1]]
[1] "Var1" "Var2"

[[2]]
[1] "Var1" "Var3"

[[3]]
[1] "Var1" "Var4"

内容的提问来源于stack exchange，提问作者Sascha