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

Question

我有一个表格，一旦所有表演都有一个＆＃34;完成＆＃34;按钮。一旦用户点击了那个＆＃34;完成＆＃34;按钮，我想显示而不是表格，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")
))

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

Answer 1

尝试：

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

条件参数是javascript expression。