一个州 Choropleth 地图内的县答案

【问题标题】：Counties within One State Choropleth Map一个州 Choropleth 地图内的县
【发布时间】：2015-10-13 20:58:54
【问题描述】：

我正在努力定制和找到正确的代码来构建我试图从特定州县的企业中获利的等值线图。

到目前为止，我所做的是能够绘制我的代码，尽管使用了我不想要的调色板并且也出现了不受欢迎的中断。

library(choroplethr)
library(ggplot2)

county <- data.frame(region = c(19001,19013,19017,19019,19021,19023,19033,19035),
                 value=c(-37102,-41052,35016,-13180,-8062,6357,-46946,-5380))

county_choropleth(county, "Test", state_zoom = "iowa") + scale_fill_brewer("Test",palette="Blues")

我得到了这个情节：

理想情况下，我希望能够将调色板自定义为正时为蓝色，负时为红色。此外，在这两种颜色之间创建更多的色阶中断也是理想的。我想让休息时间更愉快的数字，例如“35,000”、“0”等，而不是 35,016 美元，哈哈。最后，我想根据 FIPS 代码将所有 NA 县设为灰色或与比例尺上不同的颜色。

我没有成功尝试使用 scale_colour_gradient 命令及其“兄弟”命令的不同变体。

如果您需要任何说明或更多代码，请告诉我。感谢您的所有帮助！

【问题讨论】：

你试过county_choropleth(county, "Test", state_zoom = "iowa", num_colors = 1) + scale_fill_gradient2(high = "blue", low = "red", na.value = "grey90", breaks = pretty(county$value, n = 10))吗？
现在我有了，它就像一个魅力！我唯一的最后一个问题是能否调整图例，使其显示为 600,000 美元，而不是 6e+05。再次感谢！如果您回复您的评论作为答案，我很乐意将其标记为正确的。

标签： r ggplot2 choropleth choroplethr

【解决方案1】：

你可以试试

county_choropleth(county, "Test", state_zoom = "iowa", num_colors = 1) + 
  scale_fill_gradient2(high = "blue", 
                       low = "red", 
                       na.value = "grey90", 
                       breaks = pretty(county$value, n = 10), 
                       label = scales::dollar_format())

【讨论】：