r - R bsplus 包：bs_tooltip 不适用于 Shiny 中的 dateRangeInput/dateInput

Question

该软件包bsplus很棒且易于使用，但似乎无法处理 dateRangeInput。那是一个错误吗？

 Error in .tag_validate(tag, name = "div", class = "form-group shiny-input-container") : 
  class is: shiny-date-range-input form-group shiny-input-container, needs to be: form-group shiny-input-container 

它与 selectInput 和最常见的输入完美配合

没有工具提示就可以了

## Only run examples in interactive R sessions
if (interactive()) {

  ui <- fluidPage(
    dateRangeInput("daterange1", "Date range:",
                   start = "2001-01-01",
                   end   = "2010-12-31")    
  )    ,
    selectInput("date", "Date:",
                   choices = c("me","you"))%>%
    shinyInput_label_embed(
      icon("question-circle") %>%
        bs_embed_tooltip(title = "choose your date range dude !")
    )


  shinyApp(ui, server = function(input, output) { })
}

使用工具提示它不会...

## Only run examples in interactive R sessions
if (interactive()) {

  ui <- fluidPage(
    dateRangeInput("daterange1", "Date range:",
                   start = "2001-01-01",
                   end   = "2010-12-31")%>%
      shinyInput_label_embed(
        icon("question-circle") %>%
          bs_embed_tooltip(title = "choose your date range dude !")
      )    ,
    selectInput("date", "Date:",
                   choices = c("me","you"))%>%
    shinyInput_label_embed(
      icon("question-circle") %>%
        bs_embed_tooltip(title = "choose your date range dude !")
    )



  )

  shinyApp(ui, server = function(input, output) { })
}

它也不适用于 dateInput ...

标签： rinputshinytooltip