首页 > 解决方案 > 如何计算椭圆体外壳和R中的点之间的最小距离

问题描述

我将 R 中的 ellipsoidhull() 函数应用于一组 latlong 点。从那里我试图找到那个椭圆体和一个新的纬度点之间的最小距离。到目前为止,我有下面的代码,但它肯定是不完整的。任何帮助表示赞赏,谢谢。

df <- cbind(A$lat, A$long)
ellipse <- ellipsoidhull(df)

point <- (28.5,-81.2)

distance <- spDistsN1(ellipse, point, longlat = FALSE)

标签: rdistancepointellipse

解决方案


虽然不准确,但我可能已经找到了答案。我错过了预测功能,所以:

df <- cbind(A$lat, A$long)
ellipsePoints <- ellipsoidhull(df)
ellipse <- predict(ellipsePoints)

ellipse <- cbind(ellipse$longpts,ellipse$latpts)
point <- (longpt,latpt)

distance <- spDistsN1(ellipse, point, longlat = FALSE)

if anyone else has a more accurate way please let me know, thank you.

推荐阅读