shinycroneditor (version 1.0.0)

cron: Cron editor, creates a 'htmlwidgets' object, for use in a 'shiny' dashboard

Description

Cron editor, creates a 'htmlwidgets' object, for use in a 'shiny' dashboard

Usage

cron(schedule, width = NULL, height = NULL, elementId = NULL)

Value

Returns a 'htmlwidgets' object that can be used in a 'shiny' app

Arguments

schedule

Any valid cron schedule, for example "0 6 * * *"

width

How wide should the editor be? Defaults to NULL, meaning 100%

height

How high should the editor be? Defaults to NULL, meaning 32px

elementId

Optionally specifiy the ID of the element

Examples

# A simple cron editor in a Shiny app
if (interactive()) {
library(shiny)
library(shinycroneditor)

ui <- fluidPage(
titlePanel("Cron Expression Input Widget"),
mainPanel(
  shinycroneditor::cronOutput("cronschedule1", 
                              label = "Choose your first schedule", 
                              language = "en-US"),
   
   shiny::div(
     "Your first chosen schedule is: ",
     verbatimTextOutput("cronExpression1")
   ),
   
   shinycroneditor::cronOutput("cronschedule2", 
                               label = "Choose your second schedule", 
                               language = "en-US"),
   
   shiny::div(
     "Your chosen second schedule is: ",
     verbatimTextOutput("cronExpression2")
   )
 )
)

server <- function(input, output, session) {
 
 output$cronschedule1 <- shinycroneditor::renderCron({
   shinycroneditor::cron("0 6 * * *")
 })
 
 output$cronExpression1 <- renderPrint({
   input$cronschedule1
 })
 
 output$cronschedule2 <- shinycroneditor::renderCron({
   shinycroneditor::cron("30 1,3,7 * * *")
 })
 
 output$cronExpression2 <- renderPrint({
   input$cronschedule2
 })
 
}

shinyApp(ui, server)
}