К вашему сведению: я довольно новичок в 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")