无法将复选框值传递给list.files作为输入

Question

我想将我从闪亮的复选框中做出的多个选择传递给list.files（）。但是，它不会选择多个文件，而是仅选择一个首先选择的文件。

checkboxGroupInput("check","Year",c("06-2019"="1906","11-2018"="1811"),selected = "1906")

for (fil in list.files(pattern = input$check)) {
  myfilep <- paste0('/root/',fil)
  data <- read_xls(myfilep)
}

所以我将选择1906和1811，但仅选择了我的1906，并完成了数据的其余处理。 1906和1811是我的excel文件，由数据组成，并且有多个此类文件。

那么我该如何解决这个问题，有人可以帮助我吗？

谢谢， 回答