计算 r 中点对之间的距离

Qwa*_*neQ 4 r distance rbind cbind

假设我生成了 10 个随机点

x <- runif(10, min = -10, max = 10)
y <- runif(10, min = -10, max = 10)
Run Code Online (Sandbox Code Playgroud)

我想计算每对点之间的距离。所以我用

d <- dist(cbind(x,y)) 
Run Code Online (Sandbox Code Playgroud)

我得到了一个漂亮的 9*9 矩阵。

但是,如果我使用

d1 <- dist(rbind(x,y))
Run Code Online (Sandbox Code Playgroud)

结果我只得到了 1 个数字。

谁能为我解释一下吗?

fis*_*ank 5

rbind(x,y)有 2 行、10 列,被解释为 10 维空间中的 2 个点。dist(rbind(x,y))正在计算这两点之间的欧几里德距离。