R 如何在地图中添加点?

R 如何在地图中添加点?,r,dictionary,ggplot2,R,Dictionary,Ggplot2,问题的第一部分是: 绑定两个地图SWE和NOR的完整代码(shp数据从以下位置下载): 库(maptools) mapa_shp_swe三件事: 我认为你弄乱了什么是长什么是纬度。在你的geom\u点中颠倒x和y的顺序 将aestethic组放入geom_路径,因为此时任何其他geom都不需要它 为点添加一些颜色和大小,默认的黑色可能很难识别 以下方法可能有效: ggplot(newShape2, aes(x = long, y = lat)) + geom_path(aes(group

问题的第一部分是:

绑定两个地图SWE和NOR的完整代码(shp数据从以下位置下载):

库(maptools)
mapa_shp_swe三件事:

  • 我认为你弄乱了什么是长什么是纬度。在你的
    geom\u点中颠倒x和y的顺序
  • 将aestethic组放入
    geom_路径
    ,因为此时任何其他geom都不需要它
  • 为点添加一些颜色和大小,默认的黑色可能很难识别
  • 以下方法可能有效:

    ggplot(newShape2, aes(x = long, y = lat)) + 
       geom_path(aes(group=group), size=1) +
       geom_point(data = cities, aes(x = y, y = x),col="red", size=5)+
       theme_bw()
    

    利卡·蒂尔

    newShape2
    的lat和long值是什么样子的?我发现你的代码中没有明显的错误,这会让人怀疑你的原始形状文件位于普通纬度/长度以外的另一个坐标系中。太好了!谢谢你的帮助和时间@Pewi
    cities <- data.frame(ID = c("stockholm","Oslo"),
                         x = c(59.32, 59.95),
                         y = c(18.06, 10.75))
    
    ggplot(newShape2, aes(x = long, y = lat, group=group)) + 
      geom_path(size=1) +
      geom_point(data = cities, aes(x = x, y = y)) +
      theme_bw()
    
    ggplot(newShape2, aes(x = long, y = lat)) + 
       geom_path(aes(group=group), size=1) +
       geom_point(data = cities, aes(x = y, y = x),col="red", size=5)+
       theme_bw()