r - 在R中的雄蕊图上绘制多边形

Question

我使用以下代码在 r 中使用 ggmaps 获得了一张地图：

map <- get_map(c(left = 116.758747, bottom = 4.688964, right = 117.814190, top = 5.152498))

我还有一个多边形，我想在地图上绘制：

Object of class SpatialPolygonsDataFrame
Coordinates:
     min    max
x 545716 582116
y 505868 531968
Is projected: TRUE 
proj4string :
[+proj=utm +zone=50 +datum=WGS84 +units=m +no_defs]
Data attributes:
     layer  
 Min.   :1  
 1st Qu.:1  
 Median :1  
 Mean   :1  
 3rd Qu.:1  
 Max.   :1 

我知道空间范围匹配，我可以使用以下方法绘制地图：

plot(map)

但是当我在上面绘制多边形时：

plot(safe_poly, add = TRUE)

它没有出现。为什么是这样？

标签： rgis