请问各位，已知二维平面上三个点的坐标，如下，我用了2种方法计算出三角形周长，
问题1：为什么两方法算出来不一样，perimeter函数是怎么算的？
问题2：如何用R快速实现三角形周长的计算？


prob11 <- -180
prob12 <- -20
prob21 <- -140
prob22 <- 55
prob31 <- 10
prob32 <- 0
#method1
dist12 <- sqrt((prob22-prob12)^2+(prob21-prob11)^2)
dist13 <- sqrt((prob32-prob12)^2+(prob31-prob11)^2)
dist23 <- sqrt((prob22-prob32)^2+(prob21-prob31)^2)
(dist123 <- dist12+dist13+dist23) #435.8152
#method2
library(geosphere)
xy <- rbind(c(prob11,prob12), c(prob21,prob22), c(prob31, prob32))
perimeter(xy)  #40005149