R Shiny 中 fluidRow 内框上的悬停功能

Question

我有一个非常巨大的闪亮应用程序，其中有多个 fluidRow，每个 fluidRow 都有多个框元素，我想在 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 教程，我发现悬停功能仅适用于 imageOutput 和 plotOutput

Hover functionality explained by rshiny app

那么有什么解决方案可以让我将鼠标悬停在我的框元素上吗？请帮忙... 该代码只是其中的一个示例。请调整，如果您提供相同的解决方案，那就太好了。

Answer 1

是的，库 shinyBS 是可能的，因为您可以使用它的功能 BSTooltip 或 addToolTip，它们分别在输入和输出以及 UI 和服务器中工作.

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

R Shiny 中 fluidRow 内框上的悬停功能

Hover functionality on box inside a fluidRow in RShiny

shiny

intro.js