如何在 R 中的 google 地图上加入 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)

但是如何在 google 地图上连接这些点？我只能画点，但是怎么加入呢？

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))

如何在 R 中的 google 地图上加入 ggplot 点？

How to join ggplot points on google map in R?

r

ggplot2

ggmap