从UI更新/评估/呈现服务器端输出(用作conditionalPanel的条件)而不显示它

时间:2016-04-29 11:08:09

标签: r shiny

我的UI中有一个conditionalPanel需要检查某个计算是否可行,如果是,则显示输出,如果没有,则显示解释。

这是一个简化的例子:

shinyApp(
  ui = fluidPage(
    textOutput("ispossible"),
    conditionalPanel('output.ispossible === "FALSE"',
                     h4('The calculation is NOT possible')),
    conditionalPanel('output.ispossible === "TRUE"',
                     h4('The calculation IS possible'))
  ), 
  server = function(input, output) {
    output$ispossible <- reactive({
      sample(c("TRUE","FALSE"),1)     # randomly returns "TRUE" or "FALSE"
    })
  }
)

在此代码中,如果您将return("FALSE")更改为return("TRUE"),则conditionalPanel会根据需要进行更改。 然而,这只是因为textOutput首先渲染了输出。删除textOutput,它不起作用。如何强制output$ispossible更新而不显示它 - 或者如何隐藏输出?

0 个答案:

没有答案