Show the code
library(plotly)
plotly
library(plotly)
<- list(showland = TRUE,
g showcountries = TRUE,
landcolor = toRGB("forestgreen"), # land color
showocean = TRUE, # show ocean
oceancolor = "lightblue", # ocean color
# projection = list(type = 'robinson'),
projection = list(type = 'orthographic',
rotation = list(lon = 0,
lat = 0,
roll = 0)))
plot_geo() %>%
layout(title = "Demonstration Map",
geo = g)
scattermapbox
plot_ly(type = "scattermapbox") %>%
layout(
mapbox = list(
style = 'open-street-map',
zoom = 6.0, # zoom
center = list(lon = -83, lat = 42))) # centered on SE Michigan