Choroplethr多边框颜色

Question

我想让我的choroplethr地图在我的一个（或几个）县周围有不同颜色的边框。

我可以更改所有边框颜色或删除所有县的边框线，但我无法弄清楚如何只使一个县的边框变成不同的颜色。示例代码：

library(choroplethr)
library(choroplethrMaps)
library(ggplot2)

data(county.regions)
montana.counties<-county.regions[county.regions$state.name=="montana",]

fakedata<-as.data.frame(montana.counties$region)
fakedata$value<-runif(n=56, min=0, max=1)
colnames(fakedata)[1]<-"region"

county_choropleth(fakedata,
                  state_zoom = c("montana"),
                  num_colors=1) +
  geom_polygon(aes(fill = value), color="black")

作为一个例子，我希望能够使第一个县（地区30001）变红，但保留其余的县＆＃39;边界黑色。有没有人有建议？

Answer 1

Ari Lamstein非常友好地在另一个论坛上发布了我的问题的答案。我想我会在这篇文章中添加他的回复，因为他的功能是一个很好的解决方案。他回答我的问题：

  

我在关于佛罗里达州弗格森人口统计的文章中做了类似的事情。

     

http://www.arilamstein.com/blog/2015/07/02/exploring-the-demographics-of-ferguson-missouri/

     

你能看看函数highlight_county并告诉我这是否对你有所帮助？