library(leaflet)
# Default Resolution
leaflet() %>% addTiles() %>% addTerminator()
# Custom Resolutions
leaflet() %>% addTiles() %>% addTerminator(resolution=1)
leaflet() %>% addTiles() %>% addTerminator(resolution=100)
# Custom Resolution + Custom Date and on a toggleable Layer
leaflet() %>% addTiles() %>%
  addTerminator(resolution=10,
                time='2013-06-20T21:00:00Z',
                group="daylight") %>%
  addLayersControl(
    overlayGroups = c("daylight"),
    options = layersControlOptions(collapsed = FALSE)
  )

The "leaflet" R package is copyright © 2014-2016 RStudio, Inc.
The Leaflet JavaScript library is © 2010–2016 Vladimir Agafonkin, 2010–2011 CloudMade.
Maps © OpenStreetMap contributors unless otherwise noted.

Fork me on GitHub