如何在R中的谷歌地圖上加入ggplot點？

Question

我知道如何使用ggplot（）連接點：

dd <- data.frame(a=c(21.01223,18.45598,17.04542,19.44312),b=c(52.22968,51.75925,50.12482, 51.78745),
                 g=rep(1:2,2))

library(ggplot)

ggplot(data=dd,aes(x=a,y=b,group=g)) +
  geom_point(col=rep(c("darkred","black"),each=2),size=5)+
  geom_line(linetype=3)

但如何在谷歌地圖上加入這一點？ 我只能畫點，但如何加入它們？

library(ggmap)
qmap('Poland',zoom=6) + 
geom_point(data=dd,aes(x=a,y=b),col=rep(c("darkred","black"),each=2),size=5)

Answer 1

要加入這些點，您也可以將數據傳遞到geom_line() geom中。

library(ggmap)
myMap <- get_map("Poland", zoom = 6)

ggmap(myMap) + 
  geom_point(data=dd, aes(x=a,y=b), col=rep(c("darkred","black"), each=2), size=5) +
  geom_line(data=dd, aes(x=a, y=b, group = g))