1. #计算两点之间距离

library(geosphere)

t1=c(118,24)

t2=c(117,35)

aa=rbind(t1=t1,t2=t2)

distance=distm(aa)[1,2]#单位:米