r - 如何用几行代码将 R.shiny 的 selectInput 放入多个级别

Question

我想用几行代码将变量（字符）的所有级别放入 Rshiny 的 selectInput 中。

var<-c("a","a","b","b","c","d")

我想要这样的东西

c("a"="a", "b"="b", "c"="c", "d"="d")

然后像这样

c("Whole a"="="a", "Whole b"="b", "Whole c"="c", "Whole d=","d")

"Whole a"例如意味着我想写出关卡的完整名称（以大写字母开头，两个单词之间有空格）。

我想到的第一个解决方案是使用paste().

paste (unique(var),"=",unique(var),collapse = ",")

作为输出

"a = a, b= b, c = c, d = d"

但是，我知道这些代码是不够的

Answer 1

你想创建一个命名向量吗？像这样的东西。

setNames(unique(var), paste('Whole', unique(var)))

#Whole a Whole b Whole c Whole d 
#    "a"     "b"     "c"     "d"