r - 在 selectInput() 中强制没有默认选择

Question

Shiny 的 documentation提到了 selectInput() :

selected The value (or, if none was supplied, the title) of the navigation item that should be selected by default. If NULL, the first navigation will be selected.

如果默认情况下我不想从选择列表中选择任何值怎么办？

实际上，我的选择值默认被选中，应用程序的其余部分正在自动执行。但我最初不想选择任何值。我应该提供什么给 selected参数在 selectInput()要做到这一点？

确实，我不希望自动选择任何内容。我使用了下面的代码，但它仍然从列表中选择第一个可用值。我希望默认情况下没有选择，因此用户可以选择任何选项。

output$Choose_App <- renderUI({
selectInput("app",
            "Select App:",
            choices = as.character(mtrl_name),
            selected = NULL ,
            multiple = FALSE
           )
        })

正在通过 documentation我注意到只有当我选择 multiple=TRUE 时，选择才能为空。 .这样对吗？

当我改成 multiple=TRUE ，然后它不会被默认选中，这就是我想要的。但不幸的是，在进行任何选择之前，我还收到以下错误消息:

ERROR: bad 'file' argument 

如果我做错了什么，有人知道吗？但是如果我选择这个文件，那么错误就消失了。



我为此使用以下代码:

# server.R
setwd("/opt/shiny-server/samples/sample-apps/P-Dict_RDS2")
mtrl_name <- try(system("ls | grep -i .rds", intern = TRUE))

shinyServer(function(input, output) {

# First UI input (Service column) filter clientData 
output$Choose_Molecule <- renderUI({
selectInput("molecule",
            "Select Molecule:",
            choices = as.character(mtrl_name),
            selected = input$molecule,
            multiple = TRUE
           )
        })

Answer 1

您可以使用选择输入而不是选择输入，并使用一些自定义选择选项将初始选择设置为空。 An example已在 Shiny Gallery 中提供。特别是，请参见示例 #6。

# make sure you have shiny >= 0.9.1
selectizeInput(
  'e6', '6. Placeholder', choices = state.name,
  options = list(
    placeholder = 'Please select an option below',
    onInitialize = I('function() { this.setValue(""); }')
  )
)

顺便说一句，对于错误 "ERROR: bad 'file' argument" ，我认为没有人可以在没有看到您的应用程序源代码的情况下帮助您，这可能是一个单独的问题。