su: ignore --preserve-environment, it's mutually exclusive to --login.
Error in parse(file, keep.source = FALSE, srcfile = src, encoding = enc) : 
  /home/pjd445/ShinyApps/Reference/app.R:128:41: unexpected symbol
127:     ),
128:     downloadButton(ns("downloadData"), 'Download
                                             ^
Possible missing comma at:
128:    downloadButton(ns("downloadData"), 'Download'), # button for downloading data
                                            ^
Possible missing comma at:
128:    downloadButton(ns("downloadData"), 'Download'), # button for downloading data
                                                    ^
Possible missing comma at:
236:                 radioButtons(inputId = ns('sep'), label = 'Choose separator:',
                                                ^
Possible missing comma at:
236:                 radioButtons(inputId = ns('sep'), label = 'Choose separator:',
                                                   ^
Possible missing comma at:
236:                 radioButtons(inputId = ns('sep'), label = 'Choose separator:',
                                                                ^
Possible missing comma at:
236:                 radioButtons(inputId = ns('sep'), label = 'Choose separator:',
                                                                       ^
Possible missing comma at:
238:                                          ,Tab='\t', Space=''
                                                      ^
Possible missing comma at:
238:                                          ,Tab='\t', Space=''
                                                                ^
Possible missing comma at:
249:                 div(style = 'overflow-x: scroll', tableOutput(ns('contents')))))
                                  ^
Possible missing comma at:
249:                 div(style = 'overflow-x: scroll', tableOutput(ns('contents')))))
                                                    ^
Possible missing comma at:
249:                 div(style = 'overflow-x: scroll', tableOutput(ns('contents')))))
                                                                       ^
Possible missing comma at:
249:                 div(style = 'overflow-x: scroll', tableOutput(ns('contents')))))
                                                                               ^
Possible missing comma at:
254:    tags$style(type='text/css', "#addData { width:100%; margin-top: 25px;}")
                         ^
Possible missing comma at:
254:    tags$style(type='text/css', "#addData { width:100%; margin-top: 25px;}")
                                 ^
Possible missing comma at:
298:          The data should be divided into columns. If not try to select another separator radiobottom under 'Choose separator' ."
                                                                                                                 ^
Possible missing comma at:
298:          The data should be divided into columns. If not try to select another separator radiobottom under 'Choose separator' ."
                                                                                                                        ^
Possible missing comma at:
298:          The data should be divided into columns. If not try to select another separator radiobottom under 'Choose separator' ."
                                                                                                                                 ^
Possible missing comma at:
354:    navbarPage(title = 'Example',
                            ^
Possible missing comma at:
354:    navbarPage(title = 'Example',
                                   ^
Possible missing comma at:
355:               id = 'tabs',
                         ^
Error in sourceUTF8(fullpath, envir = new.env(parent = sharedEnv)) : 
  Error sourcing /home/pjd445/ShinyApps/Reference/app.R
Calls: runApp ... shinyAppDir -> shinyAppDir_appR -> appObj -> func -> sourceUTF8
Execution halted