使用R计算相对于特定列的距离

Question

我有一个10 * 10的矩阵。我想生成一个相对于特定列（column1）的距离矩阵。如何用R计算？有什么功能吗？

Answer 1

如果您需要相对于第1列

在其他列的行之间计算dist

apply(m1[,-1], 2, function(x) dist(cbind(x, m1[,1])))

或者如果距离计算在列之间

apply(m1[,-1], 2, function(x) dist(rbind(x, m1[,1])))

数据

set.seed(25)
m1 <- matrix(sample(1:30, 10*10, replace=TRUE),10, 10)