用ggplot映射状态边界

如何解决用ggplot映射状态边界？

我正在尝试创建具有县和州边界的 ggplot 地图。我可以带有县界的地图，但是当以下行以州边界时，我遇到了问题。该复制如下。

ggplot2::geom_gon(aes(x= long,y = lat,group = group),fill = NA,color = "black",data = filter(us_map(),abbr %in% states_of_interest))

运行此时，出现：

“ FUN（X [[i]]，...）中的

未找到对象'long'”。我相对不熟悉us_map程序包，但有人告诉我在lat上为x和y使用long可以正常工作。

我尝试命令

“ inherit.aes = FALSE”

根据其他堆栈溢出后的建议，但并不能。

解决方法

us_map函数返回一个带有经纬度的x和y的对象。您可以分别存储县和州，然后将它们都作为多边形添加到ggplot中。

library(usmap)

states_of_interest <- c("CA","OR","WA")

counties <- us_map(regions = "counties",include = states_of_interest)
states <- us_map(include = states_of_interest)

ggplot() + geom_polygon(data = counties,aes(x = x,y = y,group = group),fill = NA,color = "black") + geom_polygon(data = states,color = "red") + coord_equal()