R Shiny: как генерировать реактивное выражение на лету

Question

Я действительно в тупике. Я изо всех сил пытаюсь получить код ниже для запуска. Обычно «i» в for-l oop сохраняет любое имя таксона (Opt1 / Opt2 / et c), но когда я генерирую реактивное выражение, во всех случаях оно обновляется до последнего значения «я» (то есть Opt5). Есть ли способ сделать его не реактивным? Там есть несколько печатных заявлений для устранения неполадок, но я все еще изо всех сил!

EC_settings_rv <- reactiveValues( mVariableOpt1="All", mVariableOpt2="With reads", mVariableOpt3="All", mVariableOpt4="All", mVariableOpt5="All")
TaxaDataEC<-c("Opt1", "Opt2","Opt3", "Opt4","Opt5")


for(i in  TaxaDataEC){
  var<-paste0("EC_settings_rv$mVariable",i)
  print(var)
  isolate(print(eval(parse(text=paste0("EC_settings_rv$mVariable",i)))))

  assign(paste0("mVariable",i,"_rv"),reactive({var}))

}   

isolate(print(mVariableOpt2_rv()))                        #I want it to give "EC_settings_rv$mVariableOpt2, but it gives "EC_settings_rv$mVariableOpt5"
isolate(print(eval(parse(text=mVariableOpt2_rv()))))      #I want it to give "With reads", but it gives "All"

Спасибо за вашу помощь!