以 R 为底的 Spearman 脚尺距离

Question

给定两个排列：

v1
[1] 4 3 1 5 2

v2
[1] 2 3 4 5 1

如何计算以 R 为底的 Spearman 脚尺距离（所有元素的总位移）？ （对于n 的任意两个大小排列灵活）

例如，对于这两个向量，如下：

1 已从 2 位置从 v1 移动到 v2
2 已从 4 位置从 v1 移动到 v2
3 已移动 @987645 @地点从v1到v2
4被移动2地点从v1到v2
5被移动0地点从v1到@987654

所以总距离为：2+4+0+2+0 = 8

Answer 1

这是使用sapply、which和sum的方法：

sum(sapply(seq_along(v1), function(i) abs(i - (which(v2 == v1[i])))))

这里，我们沿着 v1 的索引移动，并计算当前索引中元素的索引与它在 v2 中的位置的距离。然后将它们相加。

我怀疑类似于@alexis_laz 在 cmets 中的解决方案可能具有更高的计算效率。