如何在Shiny Application的onStart参数中设置全局变量值

Question

我正在尝试使用R包Shiny中的函数ShinyApp的onStart参数来设置全局变量，而不是使用global.R文件。因此，格式为

shinyApp(onStart = ..., ui = ..., server = ...)

但是，我似乎无法设置全局变量。例如，如果我执行以下操作：

shinyApp(
    onStart = function() { 
          temp1 <- 2
          temp2 <- 3
          temp3 <- 4
    },
    ui = fluidPage(
         titlePanel("test"),
         mainPanel(uiOutput("test_slider"))),
    server = function(input, output, session) {
         output$test_slider <- renderUI({
         sliderInput("test_slider",
                     "Testing",
                     min = 0,
                     max = temp1 + temp2 + temp3 + temp4,
                     value = 0

         )
      })
    }
)

执行此操作时，出现错误“找不到对象temp1”。我不太确定如何进行这项工作，因此将不胜感激任何建议或解决方案！

Answer 1

要分配全局变量，可以使用<<- Eg：

temp1 <<- 2