按钮值作为条件面板的条件在闪亮

时间:2017-11-12 01:58:02

标签: r shiny shiny-reactivity

我有一个表格,一旦所有表演都有一个"完成"按钮。一旦用户点击了那个"完成"按钮,我想显示而不是表格,shinydashboard。

为此,我想到了两个conditionalPanel,并且由于按钮具有值,如果此值为0,则显示表单并以其他方式显示shinydashboard。我的问题是条件不起作用。

整个代码太大而无法重现,所以主要的想法是:

#server.R

library(shiny)

shinyServer(function(input, output) {

  output$frontEnd <- renderUI(
    fluidPage(
      input$buton,
      conditionalPanel("input$buton == 0",p("I'm a form")),
      conditionalPanel("input$buton > 0", p("I'm a dashboard"))
    )
  )
})



#UI.r
library(shiny)

shinyUI(fluidPage(

  # Application title
  actionButton("buton","click me"),
  htmlOutput("frontEnd")
))

任何想法为什么不采用按钮的价值?

1 个答案:

答案 0 :(得分:3)

尝试:

conditionalPanel(condition = "input.buton == 0", p("I'm a form")),
conditionalPanel(condition = "input.buton > 0", p("I'm a dashboard"))

条件参数是javascript expression