Por horas eu tenho lutado. MinhasShiny App deve exibir algumas variáveis que eu tenho no meu ambiente R. Funciona tudo funciona bem, mas quando implanto na Web, recebo erros como:

Error: object 'df1' not found

Como posso adicionardf1 e meus outros quadros de dados para que eles possam ser empacotados como parte doShiny App quando é implantado?

Por favor ajude. Aqui está o meu código de exemplo:

server.R

library(shiny)

shinyServer(function(input,output){
output$datasets <- renderTable({
switch(input$choice,

         "1" = as.data.frame(df1)          
         "2" = as.data.frame(df2) })
  }))

UI.R

shinyUI(
fluidPage(theme = "bootstrap.css",

sidebarPanel(        
  conditionalPanel(
    condition = "input.theTab == 'datasets' ",
    h3('Display Sample Data'),    
    selectInput("choice", "Selection", choices = c("Group1"=1,"Group2"=2)),

  )),

mainPanel(
  tabsetPanel(
    tabPanel( "datasets", tableOutput("datasets"), value = 'datasets'),
    id = "theTab"))
)