Shiny: создайте реактивные значения из списка имен

Question

Можно ли сгенерировать reactiveValues, где имена переменных задаются определенным списком list_of_names? Эти переменные могут, например, хранить логическое значение, указывающее состояние соответствующей переменной.

Представь, у меня есть список x:

x <- lapply(LETTERS, function(i) TRUE)
names(x) <- LETTERS

Могу ли я сгенерировать reactiveValues rv из x, который ведет себя как x?

Я не был в состоянии сделать это, и все, что я мог придумать, было что-то вроде этого:

ui <- fluidPage(
  textOutput("boolean")  
)

server = function(input, output, session){
  nms <- LETTERS[1:10]

  ### lines that I would change
  rv <- reactiveValues(A = TRUE)
  for (n in nms) {rv[[n]] <- TRUE}
  ###

  output$boolean <- renderText(rv[["D"]])
}

shinyApp(ui,server)

Это работает, но я уверен, что должен быть более простой и "чистый" способ сделать это, поскольку x и rv очень похожи. Спасибо всем, кто может помочь мне в этом.