如何用shinyjs清除带默认值的Shiny输入框并提交空值？

你在Shiny应用中尝试用shinyjs清除并禁用带默认值的输入框，界面上输入框看似已清空并禁用，但点击提交时仍会发送默认值：

这是因为仅通过JS修改输入框的value值，没有触发Shiny的输入状态更新机制，Shiny内部仍保留着最初的默认值。

解决方案1：修改自定义JS，触发Shiny输入更新 #

在你的自定义JS函数中，修改输入框值后，需要手动触发input事件，让Shiny感知到值的变化：

library(shinyjs)
library(shiny)

# 修改后的JS代码，触发Shiny输入更新
jsCode <- 'shinyjs.clear_input = function(params){
    var defaultParams = {
        input_id : null
    };
    params = shinyjs.getParams(params, defaultParams);
    var el = $("#" + params.input_id);
    el.val(""); // 改为空字符串，适配文本输入框的特性
    el.trigger("input"); // 触发Shiny的输入状态更新事件
}'

shinyApp(
    ui = fluidPage(
        useShinyjs(),  
        extendShinyjs(text = jsCode, functions = c("clear_input")),
        textInput("input",  label = "input", value = "default text"),
        actionButton("clear", label = "clear/disable"),
        actionButton("submit", "submit"),
        tags$div(id="result")
    ),
    server = function(input, output) {
        
        observeEvent(input$clear, {
            js$clear_input("input")
            disable("input")
        })

        observeEvent(input$submit, {
            insertUI("#result", ui=renderText(input$input))
        })
    }
)

解决方案2：使用Shiny原生方法（更推荐） #

不需要自定义JS，直接用Shiny自带的updateTextInput结合shinyjs::disable，更简洁可靠，避免手动处理JS事件的疏漏：

library(shinyjs)
library(shiny)

shinyApp(
    ui = fluidPage(
        useShinyjs(),  
        textInput("input",  label = "input", value = "default text"),
        actionButton("clear", label = "clear/disable"),
        actionButton("submit", "submit"),
        tags$div(id="result")
    ),
    server = function(input, output) {
        
        observeEvent(input$clear, {
            # 直接更新输入框为空字符串，Shiny会自动同步内部状态
            updateTextInput(inputId = "input", value = "")
            disable("input")
        })

        observeEvent(input$submit, {
            insertUI("#result", ui=renderText(input$input))
        })
    }
)

内容的提问来源于stack exchange，提问作者Bei