Сложность настройки цветовых шкал для карт в ggplot. Мне нужна шкала серого. Очень благодарен за идею, в которой я ошибаюсь. Я также задаюсь вопросом, есть ли более эффективный способ получения цветовой переменной в ggplot (т.е. Путем прикрепления ее к "усиленным" данным)?
library(ggplot2)
states <- map_data("state")
var <- data.frame(table(states$region)) # using rows as a dummy variable
states$variable <- var$Freq[match(states$region,var$Var1)]
map <- ggplot(states, aes(x=long, y=lat)) +
geom_polygon(aes(group=group, fill=variable), col=NA,lwd=0)
map + scale_colour_gradient(low='white', high='grey20')
map + scale_colour_grey()