(当我说“tabbed”时,我的意思是键盘的 Tab 按钮可以四处移动。)它似乎selectizeInput()
不允许我使用键盘上的“Tab”键来突出显示下一个输入(在下面的示例中,textInput
)。更新:这似乎与我的times
变量长度为 96 的事实有关 - 也许这太长了?(当我tail(times,5)
改为使用时,似乎“标签到下一个输入”就好了。
times <- gsub(" ","0",sort(apply(
expand.grid(seq(0,23),c(":00",":15",":30",":45")),1,
function(x) paste0(as.character(x), collapse=""))))
shinyApp(
ui = function(req) {
fluidPage(
selectizeInput("time", "Time:",choices=times),
textInput("descr","Description:")
)
},
server = function(input, output, session) { }
)
想法,有人吗?