Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/71.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181

Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/jquery-ui/2.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 计算向量中元素的所有成对差异_R - Fatal编程技术网

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

R 计算向量中元素的所有成对差异,r,R,我的问题与之前的一篇文章密切相关: 但我感兴趣的是这些元素的差异,而不是绝对的差异,这使得所有建议的解决方案都不可行 我知道如何使用此命令获得结果: n <- 4 x <- c(1:4) combn(x,2, FUN=diff) n您可以使用outer x <- c(1:4) outer(x,x, `-`) [,1] [,2] [,3] [,4] [1,] 0 -1 -2 -3 [2,] 1 0 -1 -2 [3,] 2

我的问题与之前的一篇文章密切相关:

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

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

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

n您可以使用
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

x您在代码中使用了
n
在哪里?@MKR OP可能想编写
x我认为这项任务将通过Andrey Shabalin在相关帖子中提出的
outer
-方法来解决。请查看
dist
函数。这是O^2计算,因此n会随着时间的快速增加而增加计算时间。另外,您的最终目的是什么?例如,如果是字符串,那么已经有很多人说过了。。e、 g.您的权利,这也比combn()快得多。我知道相关帖子中有outer(),但我想我在应用它的时候忽略了一些东西。谢谢