R 单击“操作”按钮时删除文本

我想使用shiny删除主面板上的文本输出。当应用程序启动时，应该有文本，例如“欢迎…”。通过单击“操作”按钮，将打印数据表，并删除文本，而不是将其写入表下。我试过这样做（见下文），但是

output$mytable2

不能用作指标(

错误：不允许从shinyoutput对象读取对象

)。我没有包括全部代码，因为我认为这可能是非常基本的，但我找不到解决方案。（我还尝试了“

removeUI

”从按钮的

observeEvent

功能内的ui中删除

textOutput（）

ui:[…]
主面板(
DT:：dataTableOutput（'mytable2'），
文本输出（“welcome1”）
服务器：[……]
输出$mytable2此解决方案如何：

ui.R

uiOutput("text)
actionButton("button1", "Go")

output$text <- renderUI({if(input$button1 == 0){paste("Welcome...")} else{return()}})

server.R

uiOutput("text)
actionButton("button1", "Go")

output$text <- renderUI({if(input$button1 == 0){paste("Welcome...")} else{return()}})

output$text这个解决方案怎么样：

ui.R

uiOutput("text)
actionButton("button1", "Go")

output$text <- renderUI({if(input$button1 == 0){paste("Welcome...")} else{return()}})

server.R

uiOutput("text)
actionButton("button1", "Go")

output$text <- renderUI({if(input$button1 == 0){paste("Welcome...")} else{return()}})

output$text您可以查看
shinyjs
包并隐藏文本输出。您可以查看链接。谢谢我将检查此：）！您可以查看
shinyjs
包并隐藏文本输出。你可以检查链接。谢谢我会检查这个：）！