R 我怎样才能从另一个纬度或经度中找出距离为X的纬度或经度？

我正在尝试编写一个函数来创建一个围绕坐标（Lat，Long）的正方形边界框

我需要“添加”一个距离（比如说5公里）到一个Lat长的第一次

• 我可以忽略10公里左右的小网格的投影吗
• 我可以忽略球形因素的最大近似方形框是什么
• 如何将X kms（比如5）与纬度/经度（24.5，-88.65）相加或相减，以获得边界框的边

---

另外，如果有帮助的话，我的工作是在美国大陆。

在包

geosphere

中有一个名为

destPoint（）

的函数，它将初始位置、方向（角度）和距离（米）作为输入。您可以使用此功能两次，一次用于水平方向，另一次用于垂直方向。例如：

library(geosphere)

# Starting longitude and latitude:
coords <- c(-71, 42)

# Distance in meters:
distance <- 5000

ne.coords <- c(destPoint(p = coords, b = 90, d = distance)[1],
               destPoint(p = coords, b = 0,  d = distance)[2])

sw.coords <- c(destPoint(p = coords, b = 90, d = -distance)[1],
               destPoint(p = coords, b = 0,  d = -distance)[2])

---

你是在问一般如何做这件事还是用代码做这件事？这不是一个真正的R问题。看起来您正在寻找几何帮助（投影错误等）@Takendarkk问题3是代码。谢谢，这总是向右（横向）和向上（纵向）移动吗？对于边界框，我还必须计算正方形对边的边界边。。。我该如何对此进行修改？基本上是coords+距离和coords-distance。这里它说p应该是度。在您给出的示例中，DMS=Decimal。但是如果我想使用小数（我的数据是小数），我必须先转换右键？我编辑了答案，给你框的西南部分。你只需要使用负距离

p

应该是小数，而不是DMS，所以不需要转换。

R> ne.coords
[1] -70.93965  42.04502
R> sw.coords
[1] -71.06035  41.95498