在Shiny應用程序中選擇輸入

Question

我對閃亮的應用程序非常新穎。

比方說，我有一個列表ll {「第一」 - >「一」，「第二」 - >「二」}

selectInput('some_var',h4("some content"), 
           choices=ll) 

在我的投入，我想作爲一個默認值「第二「，所以我必須從列表中獲取索引。所以，我想

test <- which(sapply(ll, FUN=function(X) "two" %in% X)) 

然後

selectInput('some_var',h4("some content"), 
            choices=ll,selected=names(test)) 

但我STIL得到的SelectInput默認值，以 「第一」。我怎樣才能做到這一點 ？

Answer 1

您好我發現了以下簡單的答案

selectInput('some_var',h4("some content"), 
            choices=ll,ll[2])