在纽约底图上绘制点

时间:2018-10-08 18:56:03

标签: r ggplot2 mapping ggmap

我想在我制作的纽约州地图上绘制点

#NY state map

usa <- map_data("usa")
states <- map_data("state")
ny_df <- subset(states, region=="new york")
ny_base <- ggplot(data=ny_df, mapping=aes(x=long, y=lat, group=group))+
  coord_fixed(1.3) + 
  geom_polygon(color="black", fill="gray")
ny_base+theme_nothing()

counties <-map_data("county")
ny_county <- subset(counties, region=="new york")
ny_base + theme_nothing() + 
  geom_polygon(data=ny_county,fill=NA, color="white")+
  geom_polygon(color="black", fill=NA)

上面的代码给了我这个:

enter image description here

但是,一旦我尝试通过添加我的积分

ny_base + theme_nothing() + 
   geom_polygon(data=ny_county,fill=NA, color="white") + 
   geom_polygon(color="black", fill=NA) + 
   geom_point(data=go, aes(x=Longitude, y=Latitude), color="red", pch=1, size=1, inherit.aes=FALSE)

上面的代码给了我这个

enter image description here

我丢失了纽约州地图,只能保持自己的观点。似乎是什么问题?

0 个答案:

没有答案