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

我想在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)出现。我究竟做错了什么？

最佳答案

纬度值对应于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))

关于r - 在R中的ggmap对象上绘制geom_segment-没有出现线条，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/24109122/