提醒:我对ggplot2和ggmap比较新,所以我的代码可能有些混乱,但这是我能绘制出每组点集都有自己颜色的唯一方法。此外,我的操作系统是Ubuntu。
我正在尝试向ggmap对象添加图例,特别是具有连续渐变颜色的图例。有什么建议吗?我已经尝试了ggmap中的图例属性,但似乎没有起作用。以下是我目前的代码。
syd = get_map(location = center, zoom = zoom, maptype = type,color = "bw")
(SYDmap = ggmap(syd, extent = "panel",legend="right")+ annotate('point',x=lng[[1]],xend=max(lng[[1]]),y=lat[[1]],yend=max(lat[[1]]),colour=colorval[1],cex=cexval,pch=pchval))
for(i in 2:(topnum - 1))
SYDmap<- SYDmap + annotate('point',x=lng[[i]],xend=max(lng[[i]]),y=lat[[i]],yend=max(lat[[i]]),colour=colorval[i],cex=cexval,pch=pchval)
i=topnum; (SYDmap <- SYDmap + annotate('point',x=lng[[i]],xend=max(lng[[i]]),y=lat[[i]],yend=max(lat[[i]]),colour=colorval[i],cex=cexval,pch=pchval)) + guides(fill = "colourbar")