计算向量 R 中值之间的距离

Gab*_*iel -1 loops r vector nested-function rstudio

我有以下多重集 X,我想在其中找到所有数字之间的距离。有什么方法可以将其集成到 FOR 循环中,这样如果给我一个不同大小的多重集,我就不必像下面那样手动执行此操作?

对于此示例,最终答案是 [0,2, 2, 3, 3, 4, 5, 6, 7, 8, 10] (已排序)

X=c(0,10,8,3,6)
L=length(X)
print(L)

##for(i in seq(from=1, to=L )){}

print(abs(X[1]-X[2]),  abs(X[1]-X[3]),
    abs(X[1]-X[4]),  abs(X[1]-X[5]),
    abs(X[1]-X[6]),  

    abs(X[2]-X[3]), abs(X[2]-X[4]),
    abs(X[2]-X[5]),  abs(X[2]-X[6]),


    abs(X[3]-X[4]),  abs(X[3]-X[5]),
    abs(X[3]-X[6]),  


    abs(X[4]-X[5]), abs(X[4]-X[6]),


    abs(X[5]-X[6])  

        )
Run Code Online (Sandbox Code Playgroud)

Jul*_*ora 5

您可能会将此向量视为列向量并应用dist:

sort(dist(X))
# [1]  2  2  3  3  4  5  6  7  8 10
Run Code Online (Sandbox Code Playgroud)