R 如果没有活动-反应上下文,则不允许操作

R 如果没有活动-反应上下文,则不允许操作,r,shiny,shiny-server,R,Shiny,Shiny Server,我正在尝试从R的数据库动态构建dataset。下面是我用于相同的代码,但在运行时出错。应用程序正在运行中 query <- "select * from rdataset" # [col-2]dataset name [col-3]Query qresult<- dbGetQuery(con,query) dataset <- reactiveValues() for (i in 1:nrow(qresult)) { qresult1 <- dbGetQuer

我正在尝试从R的数据库动态构建dataset。下面是我用于相同的代码,但在运行时出错。应用程序正在运行中

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

我也有同样的错误

错误样本

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

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

beta_reactive此错误通常表示您试图处理某种以某种方式依赖于用户输入(ui.r)的内容(vector、data.frame等),而不将其放入反应式表达式中。这其中的哪一部分是来自ui.r的输入?您可以发布ui文件的相关部分吗?触发此操作的是
数据集$qresult
,至少在我看来是这样的。您可以将
数据集$foo
分配到反应式代码之外。您不能做的是读取数据集$foo
。我认为在这种情况下,即使您试图对数据集$qresult进行变异,它也算是读写。无论如何,这通常是个坏主意,我们为数据集$foo设计了
qresult
,而我要做的是在一个普通的旧变量中构建
qresult
,然后在完成后将其分配给
dataset
。问题在于数据集$qresult[I,2]
beta_reactive <- reactive({input$beta})
output$distPlot <- renderPlot({
    ...
    beta_coeff <- beta_reactive()    
    ...
})