使用geosphere::bearingI可以计算两条直线的方位，但是可以计算两条方位之间的角度吗？
当然，您可以尝试减去或求和轴承，但是在特定情况下，其中一个为负而另一个为正，这是行不通的。
例如，如果ber1=-175和ber2= 175之间的夹角应为10。
有什么建议么 ？
我不确定是否有现成的软件包，但是如果您对解决方案感兴趣，可以尝试
angle_diff <- function(theta1, theta2){
theta <- abs(theta1 - theta2) %% 360
return(ifelse(theta > 180, 360 - theta, theta))
}
给出示例轴承之间的角度-175和175为
angle_diff(-175, 175)
#[1] 10
本文收集自互联网，转载请注明来源。
如有侵权，请联系 [email protected] 删除。
我来说两句