デフォルトの色が灰色から白に変更された米国のコロプレスマップを作成しようとしています。
48州のうち18州のレコードがあり、コードは値ごとに色分けされますが、レコードのない州の状態は灰色です。白くしてほしい。
色を変更するにはどうすればよいですか?
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())
scale_fill_continuos()
の引数na.value
を変更することで、NA値(データのない状態)の色を変更できます。
+scale_fill_continuous(low="thistle2", high="darkred",
guide="colorbar",na.value="white")