按钮值作为闪亮条件面板的条件
Button value as a condition of conditionalpanel in shiny
我有一个表单,一旦执行完所有操作,就会有一个 "Done" 按钮。一旦用户单击 "Done" 按钮,我想显示一个闪亮的仪表板而不是表单。
为此,我想到了两个条件面板,并且由于按钮有一个值,如果该值为 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")
))
知道为什么不获取按钮的值吗?
尝试:
conditionalPanel(condition = "input.buton == 0", p("I'm a form")),
conditionalPanel(condition = "input.buton > 0", p("I'm a dashboard"))
条件参数是 javascript expression。
我有一个表单,一旦执行完所有操作,就会有一个 "Done" 按钮。一旦用户单击 "Done" 按钮,我想显示一个闪亮的仪表板而不是表单。
为此,我想到了两个条件面板,并且由于按钮有一个值,如果该值为 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")
))
知道为什么不获取按钮的值吗?
尝试:
conditionalPanel(condition = "input.buton == 0", p("I'm a form")),
conditionalPanel(condition = "input.buton > 0", p("I'm a dashboard"))
条件参数是 javascript expression。