r - Displaying table output from a source function in shiny -

i have written r macro converts dataset more legible format. complete , has been tested on several datasets have decided write gui implement code using shiny.

my ui code seems working.

shinyui(fluidpage(   titlepanel("dataset conversion"),    sidebarlayout(       fileinput("filein", label = h2("select file convert.")),       submitbutton("submit")                  ),     mainpanel(       tableoutput("dataset")       )   ) ) 

however server doesn't seem producing output in main panel

source("full code.r") shinyserver(function(input, output) {    input$filein    output$dataset <- rendertable({      output   }) }) 

my source code (full code.r) has been tested , operational. requires inputted dataset called input, , following code, assigns converted dataset global environment under name output. cannot reveal the dataset due confidentiality reasons, arbitrary issue in dataset displayed.

if can spot mistakes i've been making, please let me know.

as shiny application running, shiny needs update server part, that's why you'll put input$filein in reactive function, you'll use output:

shinyserver(function(input, output) {

outputdf <-  reactive({ input$filein    })     output$dataset <- rendertable({    outputdf() }) 

}

information on reactivity:

http://shiny.rstudio.com/tutorial/lesson6/