r - 计算向量中元素的所有成对差异

Question

这个问题在这里已经有了答案:





Find the difference between all values of two vectors

(2 个回答)


3年前关闭。




我的问题与之前的帖子非常相关:compute all pairwise differences within a vector in R

但我对这些元素的差异而不是绝对差异感兴趣，这使得所有建议的解决方案都不可行。

我知道如何使用此命令获得结果:

n <- 4
x <- c(1:4)
combn(x,2, FUN=diff)

但这对于我的应用程序来说太慢了，其中 n=500/1000/... 。
在 R 中执行此操作的最有效方法是什么

Answer 1

你可以用 outer 来做到这一点

x <- c(1:4)
outer(x,x, `-`)
     [,1] [,2] [,3] [,4]
[1,]    0   -1   -2   -3
[2,]    1    0   -1   -2
[3,]    2    1    0   -1
[4,]    3    2    1    0