循环R中的原点和目标坐标

我希望使用

库（geosphere）

结构将随之改变

distCosine(c(Longo,Lato),c(Longd,Latd))

对于每一行，前两行的示例如下所示

      Longo     Lato    Longd     Latd
1 -2.098389 57.14816 4.965820 52.34876
2 -2.098389 57.14816 5.723877 58.96700

第1行的值应为700303.8

如何循环函数，然后计算第二行？

理想情况下，除此之外，还有一种输出这些距离值的方法，您可以尝试

distCosine(as.matrix(df[,1:2]), as.matrix(df[,3:4]))
#[1] 700303.9 502835.0

但这似乎也起作用，从

？distCosine

distCosine(df[,1:2], df[,3:4])
#[1] 700303.9 502835.0

距离余弦

distCosine(df[,1:2], df[,3:4])
#[1] 700303.9 502835.0

远余弦（p1，p2，r=6378137）

p1：点的经度/纬度。可以是2的向量 数字，由两列组成的矩阵（第一列是经度， 第二个是纬度）或空间点*对象

p2：如上所述

数据

df