r - 绘制地图时不显示 scale_gradient 的中断

Question

我想我有一个非常简单的问题。如果我画一个像这样的散点图：

 data <- data.frame(lon=runif(100)*3+10, lat=runif(100)*5+42, value=rnorm(100)*100)
 ggplot() + geom_point(aes(x=lon, y=lat,  color=value), data=data)

图例正确显示并指定了中断。

但是当我使用地图作为背景时：

 SHmap <- qmap(c(lon=mean(data[,'lon'], na.rm=TRUE), lat=mean(data$lat, na.rm=TRUE)), zoom=7)
 SHmap <- SHmap + geom_point(aes(x=lon, y=lat,  color=value), data=data)
 SHmap

我做错了什么还是这种行为是有意的？

Answer 1

尝试添加extent="panel"到您的qmap通话中。默认值 ,extent="device"将 atheme_nothing放到图上，从而摆脱刻度标签。

SHmap <- qmap(c(lon=mean(data[,'lon'], na.rm=TRUE), lat=mean(data$lat, na.rm=TRUE)), 
              zoom=7, extent="panel")
SHmap <- SHmap + geom_point(aes(x=lon, y=lat,  color=value), data=data)
SHmap

或者只是覆盖控制图例的主题部分，以便它们显示出来。