下面的代码根据某个指标生成此等值区域图。
map <- get_map(location = 'Europe', zoom=4)
m0 <- ggmap(map,extent="device")
m1 <- m0 + geom_polygon(aes(x=long, y=lat, group=group, fill=PERC), data=eurAccAtWorkMapDf, alpha=0.5)
m2 <- m1 + geom_path(aes(x=long, y=lat, group=group), data=eurAccAtWorkMapDf, color='black')
m2
没有必要证明一个可重复的例子,因为我的问题具有不同的性质。由于我的项目是欧洲统计局项目,我需要使用eurostat设置为默认值的特定颜色。
在上面的屏幕截图中,我想使用最后一行的调色板(PM 302)。我试图找到第一种和最后一种颜色的十六进制代码,并设置它们之间的比例范围,虽然我无法找到代码,也无法设置正确的函数(scale_color_gradient(low="",high="",guide="legend"
)什么都不做。
此外,我想删除显示在地图底部的Google标签。我不知道这是否可能,但如果有人知道这件事......