在“RgoogleMaps”包中绘制特定半径的圆

Question

我是新的RgoogleMaps包，我试图包括圆圈到我的地图与一个确切的半径。以下是我的当前代码：

library(RgoogleMaps)
data <- read.csv("test.csv", header = TRUE, sep = ",", quote = "\"",
                  dec = ".", fill = TRUE, comment.char = "")

lat <- data$Latitude
lon <- data$Longitude

PlotOnStaticMap(lat = lat, lon = lon, zoom = 10, maptype ="satellite",
                size = c(480, 480), cex = 0.2, pch = 19, col = "red", FUN = points, add = F)

在这里，对于每个“坐标点”，即地图上的每个点都来自“数据”数据，包含纬度和经度信息，我想画一个以“坐标点”为中心的2英里半径圆。因此，如果我有10行数据帧中的纬度和经度信息，我想画10个圆圈，每一行为中心，半径2英里。有可能这样做吗？在RgoogleMaps包中有此功能吗？如果没有，是否还有其他的套餐，我可以这样做？

我想使用左下角和右上角纬度和经度($BBOX$ll和$BBOX$ur)，并将这些信息与地图$size 480的大小结合起来，以求出2英里点的最大值。但如果有更简单的方法，我会很感激的。

谢谢。

所以

Answer 1

一种可能性(只要刻度是这样的，即图中的一个圆与表面上的一个圆足够接近(对平面的投影不会造成很大的扭曲)，就是使用my.symbols函数在TeachingDemos包中绘制圆。仍然使用RgoogleMaps包下载并绘制地图，然后根据地图区域的纬度或经度计算出2/10英里的距离。然后，您可以使用my.symbols，将xsize或ysize参数设置为适当的经度或纬度(您可以使用具有大量边框的ms.polygon函数来近似一个圆)。