Spearman 与底座 R 的尺距距离

给定两个排列：

v1
[1] 4 3 1 5 2

v2
[1] 2 3 4 5 1

如何计算以 R 为基数的 Spearman 尺尺距离（所有元素的总位移）？ （可灵活用于任意两种尺寸排列n)

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

1被感动了2地点来自v1 to v2
2被感动了4地点来自v1 to v2
3被感动了0地点来自v1 to v2
4被感动了2地点来自v1 to v2
5被感动了0地点来自v1 to v2

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

这是一个使用的方法sapply, which, and sum:

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

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

我怀疑评论中@alexis_laz 的解决方案可能具有更高的计算效率。