# NOT RUN {
# custom map style
gmap(lat = 40.74, lng = -73.95, zoom = 11,
width = 600, height = 600,
map_style = gmap_style("blue_water"))
# }
# NOT RUN {
gmap(title = "NYC taxi pickups January 2013",
lat = 40.74, lng = -73.95, zoom = 11,
map_type = "roadmap", width = 1000, height = 800) %>%
ly_hexbin(nyctaxihex, alpha = 0.5,
palette = "Spectral10", trans = log, inv = exp)
# }
Run the code above in your browser using DataLab