This function wraps crunch::loadDataset()
in a
shiny::reactive()
object for use in a Shiny app. It also ensures
that the current user is authenticated with Crunch before proceeding.
shinyDataset(...)
... | Arguments passed to |
---|
A Shiny reactive
object.
# NOT RUN { shinyServer(function(input, output, session) { ds <- shinyDataset("Your dataset name") freqs <- reactive({ fmla <- as.formula(paste("~", input$varname)) crtabs(fmla, data=ds()) }) }) # }