r-Choroplethr多种边框颜色

Question

我想让我的choroplether地图在我的一个（或多个）县周围有一个不同颜色的边界。

我可以更改所有的边界颜色或删除所有县的边界线，但我不知道如何使一个县的边界变成不同的颜色。样本代码：

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地区）设为红色，但将其余县的边界设为黑色。有人有什么建议吗？

Answer 1

Ari Lamstein好心地在另一个论坛上发布了我问题的答案。我想我应该把他的回复添加到这篇帖子中，因为他的功能是一个很好的解决方案。他对我的问题的回答：

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

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

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