我想解决这个问题的方法应该是在combn表达式上使用apply,比如这里的Applying combn() function to data frame,但是我还没有完全解决这个问题。sites <- combn(obs$Site, 2) 然后,单个列如下所示 combA <- combn(obs$A, 2, function(x) sum(x) 并将这些数据集绑定在一起,但这显然很快就会变得令人讨厌我试着一次完成所有变量列,如下所示 b <- apply(newdf[, -1], 1, function