縣內一個縣Choropleth地圖

我正在努力定製和找到正確的代碼來構建我試圖使企業的利潤在特定狀態縣的企業利潤的地圖。縣內一個縣Choropleth地圖

我到目前爲止所做的事情是能夠繪製我的代碼，儘管我不想要的顏色調色板也打破了也是不理想的。

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代碼將所有北美縣都做成灰色或與比例尺不同的顏色。

我嘗試使用scale_colour_gradient命令及其「兄弟」命令的不同變體未成功。

請讓我知道，如果您需要任何澄清或更多的代碼。感謝您的幫助！

來源

2015-10-13 medavis6

你試過'county_choropleth（縣，「測試」，state_zoom = 「阿華」，NUM_COLORS = 1）+ scale_fill_gradient2（高= 「藍」，低= 「紅」， na.value =「grey90」，breaks = pretty（縣$ value，n = 10））？ – lukeA

現在我有，它的作品就像一個魅力！我唯一的最後一個問題是調整傳說的能力，因此它說600,000美元而不是6e + 05。再次感謝！如果您迴應您的評論作爲答案，我很樂意將其標記爲正確的。 – medavis6

你可以嘗試

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())

來源

2015-10-13 22:02:00 lukeA

縣內一個縣Choropleth地圖

回答

相關問題