在 ggmap 上叠加一个形状文件

Question

我在将形状文件叠加到 ggmap 地图上时遇到问题。

当我运行形状文件本身很好时，请参见下图。

library(ggmap)
library(grid)

la <- get_map(location="Los Angeles County", zoom=9)

# get base map layer
gg <- ggmap(la)

 library(broom)

  LaCountyTracts <- CalifCensusTracts %>% 
   tidy(region = "GEOID") %>%
   filter(grepl("06037", id))

 ggplot(LaCountyTracts, aes(long, lat, group = group) ) +
      geom_polygon(   fill = "grey40", 
           colour = "grey90", alpha = .7, size = .05) +
      coord_map() +
      theme_minimal()

当 ggmap 和形状文件结合时，下面的代码产生了变形的形状层。

 gg + geom_polygon(data=LaCountyTracts,aes(x=long, y=lat,group=group),
                      colour = "grey90", alpha = .7, size = .05)

Answer 1

更改了

中的行

la <- get_map(location="Los Angeles County", zoom=9)

到

la <- get_map(location="Los Angeles County", zoom = 8)

这解决了问题

在 ggmap 上叠加一个形状文件

Overlay a shape file on over a ggmap

r

ggplot2

ggmap