tippy

devtools::install_github("JohnCoene/tippy")

# standard
tippy("Hover me!", tooltip = "Hi, I'm the tooltip!")

tippy("Hover me!", 
  tooltip = "Hi, I'm the tooltip!", 
  position = "right",
  theme = "light")

tippy("Hover me!", 
  tooltip = "Hi, I'm the tooltip!", 
  animation = "scale",
  duration = 1000, position = "bottom")

tippy("Click me!", 
  tooltip = "Hi, I'm the tooltip!", 
  trigger = "click",
  theme = "light")

# in shiny
library(shiny)

# use tooltip on other elements.
library(shiny)

shinyApp(
  ui = fluidPage(
    textInput("input", "input with tooltip"),
    tippy("Some text", tooltip = "Tiiiip"),
    tippy_this("input", "Tooltip", placement = "right")
 ),
 server = function(input, output) {}
)

# dynamic
library(shiny)

shinyApp(
  ui = fluidPage(
    use_tippy(),
    p("Some text", title = "tooltip"),
    p("Some text", title = "tooltip"),
    p("Some text", title = "tooltip"),
    p("Some text", title = "tooltip"),
    p("Some text", title = "tooltip"),
    p("Some text", title = "tooltip"),
    call_tippy("[title]", placement = "top")
 ),
 server = function(input, output) {}
)