在RShiny中的fluidRow内的框上悬停功能

Question

我有一个非常大的闪亮app，我有多个fluidRow，每个fluidRow有多个box元素，我想在fluidRow的所有盒子元素上创建一个悬停功能。

    library(shiny)
# library(rintrojs)

ui <- shinyUI(fluidPage(


  fluidRow(

    box(
      # h3(strong("OVERALL")),
      title = #h3(strong("OVERALL")),
        "OVERALL",
      width = 12,
      status = "primary",
      target = 'row',
      solidHeader = TRUE,
      align='center',
      collapsible = FALSE,
      DT::dataTableOutput("tab_PF1")
    )
  )
))

server <- shinyServer(function(input, output) {#Server file end

})

shinyApp(ui = ui, server = server)

查看Shiny Tutorials我可以看到悬停功能仅适用于imageOutput和plotOutput

Hover functionality explained by rshiny app

那么有什么解决方案我可以将鼠标悬停在我的盒子元素上吗？ 请帮忙... 代码只是它的一个例子。 请调整，如果你提供相同的解决方案将是很好的。

Answer 1

是的，可以使用库shinyBS，因为您可以使用其功能BSTooltip或addToolTip，它们分别适用于输入和输出以及UI和服务器。

用户界面中的

BSToolTip(title,...) 服务器中的addToolTip(session,title,...)  可以用于工具提示：悬停，单击，双击。