没有活动的反应上下文,不允许操作

时间:2013-09-24 09:59:51

标签: r shiny shiny-server

我正在尝试从R的数据库动态构建数据集。下面是我使用的代码,但运行时遇到错误。应用程序正在闪亮运行。

query <- "select * from rdataset" # [col-2]dataset name [col-3]Query
qresult<- dbGetQuery(con,query)
dataset <- reactiveValues()
for (i in 1:nrow(qresult))  {  
   qresult1 <- dbGetQuery(con,qresult[i,3])  # fetching the data from db   
   dataset$qresult[i,2] <- qresult1 #assigning it to dataset so that it can be used later
}
#dataset$MOH<- qresult1 # this line works

在跑步时我得到以下错误

Error in .getReactiveEnvironment()$currentContext() : 
  Operation not allowed without an active reactive context. (You tried to do something that can only be done from inside a reactive function.)

1 个答案:

答案 0 :(得分:1)

我在Shiny中有相同的错误

错误样本

beta_reactive <- reactive({input$beta})
beta_coeff <- beta_reactive()

output$distPlot <- renderPlot({...})

解决方案

beta_reactive <- reactive({input$beta})
output$distPlot <- renderPlot({
    ...
    beta_coeff <- beta_reactive()    
    ...
})     

反应性内容似乎是一个函数renderPlot()。 可能是反应性的,因为它与输出交互。