调用onRender()后，擦除所有selectizeInput()值而不关闭闪亮的应用程序

调用onRender()函数后，会擦除所有selectizeInput()的值，但不会关闭闪亮的应用程序。

onRender()是Shiny包中的一个函数，用于在Shiny应用程序中自定义渲染逻辑。当调用onRender()函数时，它会触发一个自定义的JavaScript函数，该函数可以用来修改应用程序的外观和行为。

selectizeInput()是Shiny包中的一个函数，用于创建一个交互式的下拉选择框。它可以用于在Shiny应用程序中提供用户选择的选项。

在调用onRender()函数后，如果希望擦除所有selectizeInput()的值，可以使用JavaScript代码来实现。具体的实现方式可以通过在onRender()函数中添加自定义的JavaScript代码来完成。例如，可以使用jQuery选择器来选中所有的selectizeInput()元素，并将其值设置为空。

以下是一个示例代码：

library(shiny)

ui <- fluidPage(
  selectizeInput("input1", "Select Option", choices = c("Option 1", "Option 2")),
  selectizeInput("input2", "Select Option", choices = c("Option 1", "Option 2")),
  actionButton("reset", "Reset")
)

server <- function(input, output, session) {
  observeEvent(input$reset, {
    session$sendCustomMessage(type = "resetSelectizeInput")
  })
  
  onRender(session, "
           Shiny.addCustomMessageHandler('resetSelectizeInput', function(message) {
             $('select').each(function() {
               $(this)[0].selectize.clear();
             });
           });
           ")
}

shinyApp(ui, server)

在上述示例中，当点击"Reset"按钮时，会发送一个自定义消息到客户端，然后通过JavaScript代码来擦除所有的selectizeInput()的值。

这样，调用onRender()函数后，就可以实现擦除所有selectizeInput()值而不关闭闪亮的应用程序。

关于Shiny和selectizeInput()的更多信息，可以参考腾讯云的相关产品和文档：

• Shiny：Shiny是一个用于构建交互式Web应用程序的R包。它可以帮助用户快速创建具有丰富交互性的数据可视化应用。了解更多信息，请访问腾讯云Shiny产品介绍。
• selectizeInput()：selectizeInput()是Shiny包中的一个函数，用于创建交互式的下拉选择框。它提供了丰富的选项和自定义功能。了解更多信息，请访问腾讯云Shiny文档。