R使用ggmap打印地图

Question

这是一个可重现的代码和平 如果你运行它你会看到它打印出一个带有两个蓝点的地图..我想添加一个separe点（不同的样式，颜色和形状）fixedPoint。我尝试了第二个geom_point但不幸的是，这只是给我一个警告。 你能帮我么？ 问候 亚历

require("ggplot2")
require("ggmap")
jet.colors <- colorRampPalette(c("#00007F", "red", "#007FFF", "yellow", "#7FFF7F", "cyan", "#FF7F00", "blue", "#7F0000"))
bbox<-c(-0.1505833, 51.5117722, -0.1363361, 51.5188167)
mp <- get_stamenmap(bbox, maptype = "toner", zoom = 16)


# prepare data points to plot
# First Set
dfE<-data.frame(c(-0.1456250,-0.1442639),c(51.51476,51.51492),c(0.018878676,0.111847050))
names(dfE) <- c("Longitude", "Latitude", "Error")

# Second Set
stationaryPoint<-data.frame(0.1422361,51.51516)
names(stationaryPoint) <- c("Longitude", "Latitude")

ggmap(mp, darken = 0) + geom_point(aes(Longitude, Latitude, colour =Error), data = dfE, size = 10)+geom_point(aes(Longitude,Latitude),data=stationaryPoint) 

Answer 1

使用

stationaryPoint<-data.frame(-0.1422361,51.51516)

而不是

stationaryPoint<-data.frame(0.1422361,51.51516)

原点位于地图边界之外。 ggplot2将超出限制的坐标转换为NA。因此警告。