我对闪亮的应用程序非常陌生。
假设我有一个列表ll
{“first” - > “一个”,“第二个” - > “二”}
selectInput('some_var',h4("some content"),
choices=ll)
在我的输入中,我希望得到默认值“second”,这样我就必须从列表中获取索引。所以我试过
test <- which(sapply(ll, FUN=function(X) "two" %in% X))
然后
selectInput('some_var',h4("some content"),
choices=ll,selected=names(test))
但我仍然在SelectInput
所以“先”获得默认值。我怎么能这样做?
答案 0 :(得分:0)
嗨,我发现了以下简单的答案
selectInput('some_var',h4("some content"),
choices=ll,ll[2])