此问题已在此处有答案:
plotly won't disappear + (action Button) shiny(2个答案)
12小时前关闭。
这似乎是一个简单的任务,但我找不到解决方案。我希望情节只出现在我选择“情节”时。否则,它将完全消失(没有白色,“你好”应上移)。
library(shiny)
ui <- fluidPage(theme = shinythemes::shinytheme("darkly"),
selectInput("select", "select", c("No plot", "Plot")),
plotOutput("plot"),
tags$h1("hello")
)
server <- function(input, output, session) {
output$plot <- renderPlot({
if (input$select == "No plot") {
NULL
} else {
plot(1)
}
})
}
shinyApp(ui, server)
1条答案
按热度按时间pwuypxnk1#
我们可以使用
conditionalPanel
来实现: