r - 在 R 中的 ggmap 对象上绘制 geom_segment - 线未出现

Question

我想在我的 geom_segment 上绘制线条(准确地说:ggmap 元素)对象(据我所知，这是一个 ggplot2 对象)。

我使用以下代码:

library(ggmap)

mapImageData <- get_map(location = c(lon = (16.8 + ( 17.2-16.8)/2), 
                                     lat = (51 + (51.2-51)/2)),
                        color = "color",
                        source = "google",
                        maptype = "roadmap",
                        zoom = 11)

ggmap(mapImageData, extent = "device", ylab = "Latitude", xlab = "Longitude") + 
geom_segment(aes(x = 51, y = 16.8, xend = 51.2, yend = 17.2))

正在绘制清晰的 map :



但是 没有线 (来自 geom_segment) 正在出现 .我究竟做错了什么？

Answer 1

纬度值对应于 y 值，经度对应于 x 值。所以你必须改变 geom_segment() 中的 x 和 y 值.

ggmap(mapImageData, extent = "device", ylab = "Latitude", xlab = "Longitude") + 
      geom_segment(aes(y = 51, x = 16.8, yend = 51.2, xend = 17.2))