# NOT RUN {
map <- get_map()
map
str(map)
ggmap(map)
# }
# NOT RUN {
# not run by check to reduce time; also,
# osm may error due to server overload
(map <- get_map(maptype = "roadmap"))
(map <- get_map(source = "osm"))
(map <- get_map(source = "stamen", maptype = "watercolor"))
map <- get_map(location = "texas", zoom = 6, source = "stamen")
ggmap(map, fullpage = TRUE)
# }
Run the code above in your browser using DataLab