如何使用r

Question

我正试图在ggmap link之后创建加利福尼亚州的地图。但是，当我运行以下代码时，它会给我以下错误。

get_map(location ='california',zoom =4)

  

从网址映射：http://maps.googleapis.com/maps/api/staticmap?center=california&zoom=4&size=640x640&scale=2&maptype=terrain&language=en-EN&sensor=false       来自网址的信息：http://maps.googleapis.com/maps/api/geocode/json?address=california&sensor=false       来自Google地图的1280x1280地形图图像。看？ggmap来绘制它。

另外，我打算尝试在同一张地图上绘制一些位置。 非常感谢任何帮助。

我绘制纬度和经度的数据集如下所示：

structure(list(hotel_name = structure(c(1L, 5L, 2L, 4L, 3L), .Names = c("h1_Loc", 
"h2_Loc", "h3_Loc", "h4_Loc", "h5_Loc"), .Label = c("Grand Hyatt San Diego", 
"Grand Hyatt San Francisco", "Hyatt Regency Orange County", "Hyatt Regency Sacramento", 
"Hyatt Regency San Francisco"), class = "factor"), longi = c(-117.1687, 
-122.3954, -122.4073, -121.4908, -117.9164), lati = c(32.70974, 
37.79459, 37.78922, 38.57763, 33.78932)), .Names = c("hotel_name", 
"longi", "lati"), row.names = c("h1_Loc", "h2_Loc", "h3_Loc", 
"h4_Loc", "h5_Loc"), class = "data.frame")

Answer 1

扩展了JasonAizkaln的答案，但get_map函数只是从谷歌地图下载了瓷砖。显示的消息不是错误，只是一条消息让您了解此下载。

如果您要停用该消息，可以messaging = FALSE添加get_map，如documentation中所述。

要绘制结果，您需要使用ggmap函数，它会创建一个典型的ggplot对象：

map <- get_map(location ='california',zoom = 4)
ggmap(map)

您可以使用标准ggplot函数轻松地向其添加数据。将提供的数据加载为df，我们可以按如下方式绘制点：

map <- get_map(location ='california',zoom = 5)
ggmap(map) + 
  geom_point(data = df, aes(x =longi, y = lati))