I want to bundle a shiny app in one of my package, and I want the function that call the shiny app to take some variables as input and pass it to the app.
This is the function that I created to call my shiny app:
MyShinyApp <- function(username, password, workspace) {
shiny::runApp(system.file('MyShinyApp', package='MyPackage'))
}
Alas, I cannot figure out how to pass those variables to the shiny app. I tried adding them to the runApp command and to shinyServer( function(input, output, session)
but it didn't work.
Can you point me in the right direction?
Thanks!