Shiny应用中shinyjs::reset清空文本域功能失效问题求助
问题根因
所有shinyjs提供的前端交互能力,都需要先在UI侧完成初始化注入,你当前的代码仅引入了shinyjs依赖包,但没有在UI中调用shinyjs::useShinyjs(),因此服务端执行的reset命令没有对应的前端逻辑承接,无法触发文本域清空效果。
修复方案
仅需要在UI的dashboardBody的最开头添加shinyjs::useShinyjs()即可,修改后的UI部分代码如下:
ui <- dashboardPage( dashboardHeader(title = "Dynamic sidebar"), dashboardSidebar(sidebarMenu(id = "menu", sidebarMenuOutput("menu"))), dashboardBody( # 新增shinyjs初始化代码 shinyjs::useShinyjs(), tabItems ( tabItem (tabName = "plots", h2("Dashboard plots"), fluidRow(column(width = 12, class = "well", h4("Boxplot"), plotOutput("bxp"))) ), tabItem(tabName = "dashboard", h2("Dashboard tab content"), dataTableOutput(outputId = "subdt"),textAreaInput("sd","label1"),textAreaInput("sd1","label2") , actionButton("idff","click")) ) ) )
修改后点击click按钮即可正常清空两个文本域的输入内容。
内容的提问来源于stack exchange,提问作者user11740857
相关产品推荐
相关产品推荐

