su: ignoring --preserve-environment, it's mutually exclusive with --login

Attaching package: ‘shinydashboard’

The following object is masked from ‘package:graphics’:

    box


Attaching package: ‘shinydashboardPlus’

The following objects are masked from ‘package:shinydashboard’:

    box, dashboardHeader, dashboardPage, dashboardSidebar, messageItem,
    notificationItem, taskItem

The following object is masked from ‘package:shinyWidgets’:

    progressBar

The following object is masked from ‘package:graphics’:

    box


Attaching package: ‘DT’

The following objects are masked from ‘package:shiny’:

    dataTableOutput, renderDataTable


Attaching package: ‘dplyr’

The following objects are masked from ‘package:stats’:

    filter, lag

The following objects are masked from ‘package:base’:

    intersect, setdiff, setequal, union


Attaching package: ‘plotly’

The following object is masked from ‘package:ggplot2’:

    last_plot

The following object is masked from ‘package:stats’:

    filter

The following object is masked from ‘package:graphics’:

    layout


Attaching package: ‘jsonlite’

The following object is masked from ‘package:shiny’:

    validate


Listening on http://127.0.0.1:41007
Warning: Error in if: argument is of length zero
  97: renderUI [/srv/shiny-server/PheMEGA/app.R#338]
  96: func
  83: renderFunc
  82: output$ui_num_2
   1: runApp
Warning: Error in if: argument is of length zero
  45: observe [/srv/shiny-server/PheMEGA/app.R#522]
  44: <observer>
   1: runApp
Warning: Error in if: argument is of length zero
  97: renderUI [/srv/shiny-server/PheMEGA/app.R#338]
  96: func
  83: renderFunc
  82: output$ui_num_2
   1: runApp
Warning: Error in if: argument is of length zero
  45: observe [/srv/shiny-server/PheMEGA/app.R#522]
  44: <observer>
   1: runApp
Warning: Error in if: argument is of length zero
  97: renderUI [/srv/shiny-server/PheMEGA/app.R#338]
  96: func
  83: renderFunc
  82: output$ui_num_2
   1: runApp
Warning: Error in if: argument is of length zero
  45: observe [/srv/shiny-server/PheMEGA/app.R#522]
  44: <observer>
   1: runApp
Error in parse(file, keep.source = FALSE, srcfile = src, encoding = enc) : 
  /srv/shiny-server/PheMEGA/app.R:27:20: unexpected symbol
26: version <- Sys.getenv("TB_VERSION")
27: print("Sys.getenv("TB_VERSION
                       ^
Possible missing comma at:
27:print("Sys.getenv("TB_VERSION")")
                      ^
Possible missing comma at:
27:print("Sys.getenv("TB_VERSION")")
                                ^
Possible missing comma at:
362:      sapply(df_n$n, function(x) min(c(x, 5))),
                                     ^
Possible missing comma at:
367:    for (i in 1:nrow(df_n)) {
               ^
Possible missing comma at:
367:    for (i in 1:nrow(df_n)) {
                  ^
Possible missing comma at:
437:    for (a in unique(df$ance)) {
               ^
Possible missing comma at:
437:    for (a in unique(df$ance)) {
                  ^
Possible missing comma at:
486:    for (a in unique(df_hetero()$ance)) {
               ^
Possible missing comma at:
486:    for (a in unique(df_hetero()$ance)) {
                  ^
Possible extra comma at:
680:    ),
         ^
Warning: Error in sourceUTF8: Error sourcing /srv/shiny-server/PheMEGA/app.R
  1: runApp
Error in parse(file, keep.source = FALSE, srcfile = src, encoding = enc) : 
  /srv/shiny-server/PheMEGA/app.R:27:22: unexpected symbol
26: version <- Sys.getenv("TB_VERSION")
27: print("Sys.getenv(\\"TB_VERSION
                         ^
Possible missing comma at:
27:print("Sys.getenv(\\"TB_VERSION\\")")
                        ^
Possible missing comma at:
362:      sapply(df_n$n, function(x) min(c(x, 5))),
                                     ^
Possible missing comma at:
367:    for (i in 1:nrow(df_n)) {
               ^
Possible missing comma at:
367:    for (i in 1:nrow(df_n)) {
                  ^
Possible missing comma at:
437:    for (a in unique(df$ance)) {
               ^
Possible missing comma at:
437:    for (a in unique(df$ance)) {
                  ^
Possible missing comma at:
486:    for (a in unique(df_hetero()$ance)) {
               ^
Possible missing comma at:
486:    for (a in unique(df_hetero()$ance)) {
                  ^
Possible extra comma at:
680:    ),
         ^
Warning: Error in sourceUTF8: Error sourcing /srv/shiny-server/PheMEGA/app.R
  1: runApp
Warning: Error in if: argument is of length zero
  97: renderUI [/srv/shiny-server/PheMEGA/app.R#340]
  96: func
  83: renderFunc
  82: output$ui_num_2
   1: runApp
Warning: Error in if: argument is of length zero
  45: observe [/srv/shiny-server/PheMEGA/app.R#524]
  44: <observer>
   1: runApp
Warning: Error in if: argument is of length zero
  97: renderUI [/srv/shiny-server/PheMEGA/app.R#340]
  96: func
  83: renderFunc
  82: output$ui_num_2
   1: runApp
Warning: Error in if: argument is of length zero
  45: observe [/srv/shiny-server/PheMEGA/app.R#524]
  44: <observer>
   1: runApp
Warning: Error in if: argument is of length zero
  97: renderUI [/srv/shiny-server/PheMEGA/app.R#340]
  96: func
  83: renderFunc
  82: output$ui_num_2
   1: runApp
Warning: Error in if: argument is of length zero
  45: observe [/srv/shiny-server/PheMEGA/app.R#524]
  44: <observer>
   1: runApp
Warning: Error in if: argument is of length zero
  97: renderUI [/srv/shiny-server/PheMEGA/app.R#340]
  96: func
  83: renderFunc
  82: output$ui_num_2
   1: runApp
Warning: Error in if: argument is of length zero
  45: observe [/srv/shiny-server/PheMEGA/app.R#524]
  44: <observer>
   1: runApp
Warning: Error in if: argument is of length zero
  97: renderUI [/srv/shiny-server/PheMEGA/app.R#338]
  96: func
  83: renderFunc
  82: output$ui_num_2
   1: runApp
Warning: Error in if: argument is of length zero
  45: observe [/srv/shiny-server/PheMEGA/app.R#522]
  44: <observer>
   1: runApp
Warning: Error in if: argument is of length zero
  97: renderUI [/srv/shiny-server/PheMEGA/app.R#340]
  96: func
  83: renderFunc
  82: output$ui_num_2
   1: runApp
Warning: Error in if: argument is of length zero
  45: observe [/srv/shiny-server/PheMEGA/app.R#524]
  44: <observer>
   1: runApp
Warning: Error in if: argument is of length zero
  97: renderUI [/srv/shiny-server/PheMEGA/app.R#340]
  96: func
  83: renderFunc
  82: output$ui_num_2
   1: runApp
Warning: Error in if: argument is of length zero
  45: observe [/srv/shiny-server/PheMEGA/app.R#524]
  44: <observer>
   1: runApp
Warning: Error in if: argument is of length zero
  97: renderUI [/srv/shiny-server/PheMEGA/app.R#340]
  96: func
  83: renderFunc
  82: output$ui_num_2
   1: runApp
Warning: Error in if: argument is of length zero
  45: observe [/srv/shiny-server/PheMEGA/app.R#524]
  44: <observer>
   1: runApp
Terminated