Atmosphere & Grid

Customise atmosphere (bright halo surrounding the globe) and graticules grid demarking latitude and longitude lines at every 10 degrees.

show_atmosphere(globe, show = TRUE)

show_graticules(globe, show = TRUE)

Arguments

globe	An object of class globe as returned by create_globe, or an object of class globeProxy as returned by globeProxy.
show	Whether to show the atmosphere or graticules.

Examples

# basic use case
img <- image_url("blue-marble")
create_globe() %>%
  globe_img_url(img) %>%
  show_atmosphere(FALSE) %>%
  show_graticules(TRUE)

# use in shiny
library(shiny)

ui <- fluidPage(
  radioButtons("show", "Atmosphere", choices = c(TRUE, FALSE)),
  globeOutput("globe")
)

server <- function(input, output){
  output$globe <- renderGlobe({
    create_globe() %>%
      globe_img_url()
  })

  observeEvent(input$show, {
    globeProxy("globe") %>%
      show_atmosphere(input$show)
  })
}
# NOT RUN {
shinyApp(ui, server)
# }