I am trying to create a choropleth map of the US that has the default color changed from gray to white.
I have records for 18 of 48 states and the code works to color by value, but for those states where I have no records the states are gray. I would like them to be white.
How do I change the color?
library(maps) library(plyr) library(ggplot2) records1<-read.csv('E:/My Documents/records_by_state.csv') records<-data.frame(state=tolower(rownames(records1)), records1) head(records) all_states<-map_data("state") head(all_states) record_map<-merge(all_states, records, by.x="region", by.y="state.name") record_map<-arrange(record_map, group, order) head(record_map) p<- ggplot() p<- p + geom_polygon(data=record_map, aes(x=long, y=lat, group=group, fill=record_map$Records), colour="black" )+ scale_fill_continuous(low="thistle2", high="darkred", guide="colorbar") P1 <- p + theme_bw() +labs(fill= "Records by State" , title= "By State", x="", y="") P1 + scale_y_continuous(breaks=c()) + scale_x_continuous(breaks=c()) + theme(panel.border= element_blank())
You can change color of NA values (states without data) by changing argument na.value
in scale_fill_continuos()
.
+scale_fill_continuous(low="thistle2", high="darkred", guide="colorbar",na.value="white")
If you love us? You can donate to us via Paypal or buy me a coffee so we can maintain and grow! Thank you!
Donate Us With