如何实现两个DataFrame列表的全组合行绑定？

要实现两个DataFrame列表的笛卡尔积式行绑定（即List1中每个DataFrame都与List2中每个DataFrame绑定），可以用以下几种方法：

方法1：使用purrr包的cross2（推荐） #

cross2会直接生成两个列表的所有两两组合，再通过map逐个执行行绑定：

library(purrr)

# 生成所有笛卡尔积组合并逐个rbind
result <- cross2(List1, List2) %>%
  map(~ rbind(.x[[1]], .x[[2]]))

执行后result就是包含9个DataFrame的列表，顺序完全符合需求：a-1、a-2、a-3、b-1、b-2、b-3、c-1、c-2、c-3。

方法2：嵌套lapply循环 #

通过两层遍历实现所有组合的绑定，最后展开嵌套列表：

# 外层遍历List1，内层遍历List2，逐个绑定
result <- lapply(List1, function(df1) {
  lapply(List2, function(df2) {
    rbind(df1, df2)
  })
}) %>% unlist(recursive = FALSE)

方法3：用expand.grid生成索引组合 #

先生成所有索引的笛卡尔积，再根据索引绑定对应DataFrame：

# 生成所有i（List1索引）和j（List2索引）的组合
combos <- expand.grid(i = seq_along(List1), j = seq_along(List2))

# 按索引对执行rbind
result <- mapply(function(i, j) rbind(List1[[i]], List2[[j]]),
                 combos$i, combos$j, SIMPLIFY = FALSE)

为什么原来的Map不行？ #

Map(rbind, List1, List2)是按位置一一配对（类似Python的zip），只会生成与原列表长度相同的组合（3个），而我们需要的是两个列表的所有两两组合（3×3=9个），也就是笛卡尔积操作。

内容的提问来源于stack exchange，提问作者C. Guff