nightly: Implement a dark/light toggle mode by default

In Rnightly: A Wrapper of the 'JavaScript' Library 'Nightly'

Description

Implement a default dark/light toggle mode that will be triggered by any shiny element. The user can also define other colors to work with.

Usage

nightly(
  trigElement,
  bodyColor = "#282828",
  txtColor = "#f5f5f5",
  inpTxtColor = "#f5f5f5",
  inpBgColor = "#313131"
)

Arguments

trigElement	the id of the shiny element that will trigger the toggle mode
bodyColor	the color of the application's body after clicking on the trigElement. Defaults to #282828 (dark)
txtColor	the color of the text within the application after clicking on the trigElement. Defaults to #f5f5f5 (white)
inpTxtColor	the color of the text within the shiny inputs after clicking on the trigElement. Defaults to #f5f5f5 (white)
inpBgColor	the color of the background of the shiny inputs after clicking on the trigElement. Defaults to #313131 (Very Dark Grey)

Value

A default dark/light toggle mode in shiny ui

Examples

if (interactive()) {
ui <- fluidPage(
 use_nightly(),

 h1("Click on the Plot to Toggle a Dark/Light Mode in you Shiny Application"),

 plotOutput(outputId = "plt1"),

 nightly(trigElement = "plt1")

)


server <- function(input, output) {

output$plt1 <- renderPlot({


plot(mtcars)


})


}


shinyApp(ui = ui, server = server)


}

Rnightly documentation built on July 1, 2020, 10:19 p.m.