Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/81.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 闪亮-所有子列表在“中”;“选择”;你一定要点名吗?_R_Shiny - Fatal编程技术网

R 闪亮-所有子列表在“中”;“选择”;你一定要点名吗?

R 闪亮-所有子列表在“中”;“选择”;你一定要点名吗?,r,shiny,R,Shiny,我想创建一个选择选项,如下所示 <select id="species"> <option value="1">A</option> <option value="2">B</option> <option value="3">C</option> </select> 我得到这个错误 Error in (function (choice, name) : All sub-list

我想创建一个选择选项,如下所示

<select id="species">
  <option value="1">A</option>
  <option value="2">B</option>
  <option value="3">C</option>
</select>
我得到这个错误

Error in (function (choice, name)  : 
  All sub-lists in "choices" must be named.

这是什么意思?如何修复它以获得所需的结果?

code
列作为数据框中的一个因素似乎是个问题,可以尝试:

choicesSpecies <- setNames(as.numeric(species$code), species$title)

回应您关于以下方面的评论(没有足够的代表回复):

code <- c('a','b','c')

code您是否可以尝试使用
choices=species$code
,然后使用
switch
语句来获取等效代码?当您以这种方式设置名称时,是否也会发生错误(使用这种方法时我从未出错):ChoiceSpecies谢谢各位。但是这些建议恐怕都不管用……谢谢,很好。它适用于
精选品种
choicesSpecies <- setNames(as.numeric(species$code), species$title)
#create the named list
title <- c('A', 'B', 'C')
code <- c('1', '2', '3')
names(code) <- title
selectInput(inputId = "species",
                label = "Species:",
                choices = code) 
code <- c('a','b','c')
choicesSpecies <- setNames(as.character(species$code), species$title)