R“选择所有输入”不选择任何输入

使用R Shining构建交互式仪表板，我希望在默认情况下选择输入中的所有选项。由于某些原因，在运行应用程序时，所有选项仍然被取消选择

代码（UI）：

库（闪亮）
数据对我来说似乎都很好，即使是
as.list
，我认为这是不必要的。可能与您正在使用的名称冲突
input

rm(list = ls())
library(shiny)

select1 <- unique(mtcars$cyl)

ui <- fluidPage(checkboxGroupInput("select1",label = "input",choices = select1,selected = select1))
server <- function(input, output, session) {}
runApp(list(ui = ui, server = server))

rm（list=ls（））
图书馆（闪亮）
选择1 as.list（）本身就是问题所在。删除函数，将向量作为输入，效果很好。谢谢你的帮助；）
rm(list = ls())
library(shiny)

select1 <- unique(mtcars$cyl)

ui <- fluidPage(checkboxGroupInput("select1",label = "input",choices = select1,selected = select1))
server <- function(input, output, session) {}
runApp(list(ui = ui, server = server))