geom_point 未显示在 ggmap 图上

geom_point not showing on ggmap plot

我正在尝试使用 ggmap 和 geom_point 在地图上绘制一些 latitude/longitude 点。我以前做过,没有任何问题,但这次它根本不会显示。我试过取消列出数据,修改 aes() 等,但没有任何效果。 point_map 的输出只是没有点的 Area_Map。我在这里错过了什么?

# Read in data from csv files. 
bearingDat <- read.csv('bearing_Data.csv', sep = ',')

lonlatDat <- read.csv('lonlat_Data.csv', sep = ',')

# Create vectors for data. 
bearing <- c(bearingDat[1])
longitude <- c(lonlatDat[2])
latitude <- c(lonlatDat[1])

# Install necessary packages.
#install.packages("ggmap", "rworldmap")
#library(ggmap)
#library(rworldmap)


# Acquire map of area. 
Area_Map <- ggmap(get_map(location = c(175.733095424,-39.278361404),
                               zoom = 18,
                               maptype = "satellite",
                               color = "color"
)
)


point_map <- Area_Map + geom_point(data = lonlatDat, 
                                        aes(x=longitude, y=latitude),
                                        col = "red", 
                                        size = 1,
                                        alpha = 0.5,
                                        na.rm = TRUE
)

point_map

这里分别是经度和纬度的前 10 个值。

1   175.4404  39.15582
2   175.4404  39.22650
3   175.4404  39.22650
4   175.4404  39.22650
5   175.4404  39.22650
6   175.4404  39.22650
7   175.4404  39.22650
8   175.4404  39.22650
9   175.4403  39.42777
10  175.4403  39.42777

您的地图位于 -39.278361404,您的点位于 39.15582,它们位于世界的两端。

如果你修复其中一个,那么你可能会看到一些东西。我的直觉告诉我,它们可能仍然在您的缩放级别范围之外。

尝试使用:

calc_zoom(lon, lat, data, adjust = 0, f = 0.05)

获得显示距离原始地图最远点的缩放级别,您应该可以开始了。