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

Question

我正在尝试使用onStart参数为来自R包的shinyApp函数设置全局变量而不是使用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

要分配全局变量，您可以使用<<- E.g：

temp1 <<- 2