ggmap和plot在地图上显示不同的区域

Question

在ggmap和plot的帮助下，我想在地图上显示状态中心。结果应该是这样的

我尝试了这段代码但是没有显示上面的地图

data(state)

cen_df <- as.data.frame(state.center)
library(ggmap)
library(ggplot2)

d <- data.frame(lat = cen_df[2],
                lon = cen_df[1])

US <- get_map("united states", zoom = 12)

p <- ggmap(US)
p + geom_point(data = d, aes(x = lon, y = lat), color = "red", size = 30, alpha = 0.5)

ggplot_build(p)

但它显示出一些谎言：

任何帮助？

Answer 1

我修改了你的代码如下。 zoom应为4.最好使用base_layer参数放置ggplot2对象。

data(state)

library(ggmap)
library(ggplot2)

d <- data.frame(lat = state.center$y,
                lon = state.center$x)

US <- get_map("united states", zoom = 4)

p <- ggmap(US, base_layer = ggplot(data = d)) +
  geom_point(aes(x = lon, y = lat), color = "red", size = 2, alpha = 0.5)
p