R 创建一个小窗口来描述过滤器的含义

R 创建一个小窗口来描述过滤器的含义,r,shiny,R,Shiny,朋友们,我想补充一个关于每个过滤器使用的简要说明。然后,无论何时单击过滤器名称,都会出现一个小窗口,其中包含有关该过滤器含义的简短信息文本。我留了一张图片作为说明。 因此,例如,如果我单击“箱数”,则会显示此过滤器含义的说明。显然,如果在信息窗口外单击,信息文本将退出 我怎么能在亮晶晶里做到这一点 library(shiny) ui <- fluidPage( titlePanel("Old Faithful Geyser Data"), sidebarLayout(

朋友们,我想补充一个关于每个过滤器使用的简要说明。然后,无论何时单击过滤器名称,都会出现一个小窗口,其中包含有关该过滤器含义的简短信息文本。我留了一张图片作为说明。 因此,例如,如果我单击“箱数”,则会显示此过滤器含义的说明。显然,如果在信息窗口外单击,信息文本将退出

我怎么能在亮晶晶里做到这一点

library(shiny)

ui <- fluidPage(


  titlePanel("Old Faithful Geyser Data"),

  sidebarLayout(
    sidebarPanel(
      sliderInput("bins",
                  "Number of bins:",
                  min = 1,
                  max = 50,
                  value = 30)
    ),

    sidebarLayout(
      sidebarPanel(
        sliderInput("bins",
                    "Number of bins:",
                    min = 1,
                    max = 20,
                    value = 30),
      ),
      mainPanel(
        plotOutput("distPlot")
      )
    )
  ))

server <- function(input, output) {

  output$distPlot <- renderPlot({
    # generate bins based on input$bins from ui.R
    x    <- faithful[, 2]
    bins <- seq(min(x), max(x), length.out = input$bins + 1)

    # draw the histogram with the specified number of bins
    hist(x, breaks = bins, col = 'darkgray', border = 'white')
  })
}

# Run the application 
shinyApp(ui = ui, server = server)


库(闪亮)

ui您可以使用
shinyBS
来实现这一点-要么
bsTooltip
popfify
,要么
tipify
。例如:

编辑: 切换到流行音乐


图书馆(shinyBS)
图书馆(闪亮)

ui您可以使用
shinyBS
来实现这一点-要么
bsTooltip
popfify
,要么
tipify
。例如:

编辑: 切换到流行音乐


图书馆(shinyBS)
图书馆(闪亮)

谢谢你的回复,朋友。但是文本框变黑了,请留空好吗?如果您愿意,您可以使用popify,或者更改bToolTip的样式。感谢朋友的回复Ser12728748,您是否知道要回答以下问题:感谢朋友的回复。但是文本框变黑了,请留空好吗?如果您愿意,您可以使用popify,或者更改bToolTip的样式。感谢朋友的回复User12728748,您知道如何回答以下问题吗: