Создание динамического списка с R, чтобы использовать его в блестящем

Question

Мне нужно отформатировать список, чтобы элементы списка отображались как переключатели на моем блестящем приложении. Ниже приведен пример того, как мой список в настоящее время отформатирован:

mylist = list("Choice 1"=1, "Choice 2"=2, "Choice 3"=3) 

Список должен генерироваться динамически. Список будет запрошен, чтобы определить правильное имя, чтобы заменить «Выбор 1», «Выбор 2» и «Выбор 3».

Я попытался использовать list<-append, но он не интерпретирует имя переменной. Пример:

var = "SimpleTest" 
mylist=list() 
mylist<-append(mylist,list(var=1)) 

Выходной ток:

# $var 
# [1] 1 

Мой желаемый результат:

$SimpleTest 
[1] 1 

Answer 1

Я редактировал свой пост, чтобы прояснить этот вопрос и улучшить читаемость.

Если я вас правильно понял, вы пытаетесь обновить имя (и только имя) этого элемента списка, значение которого равно 1.

mylist = list("Choice 1"=1, "Choice 2"=2, "Choice 3"=3) 
var = "SimpleTest" 
mylist 
# $`Choice 1` 
# [1] 1 
# $`Choice 2` 
# [1] 2 
# $`Choice 3` 
# [1] 3 

Если да, то следующий код будет делать это. Присвоить имя этого элемента списка, который имеет значение 1, строка сохраняется в переменной вар:

names(mylist)[which(mylist==1)]=var 
mylist 
# $SimpleTest 
# [1] 1 
# $`Choice 2` 
# [1] 2 
# $`Choice 3` 
# [1] 3