library(ggplot2)
iris %>%
add_tooltip() %>%
head(1)
iris %>%
add_tooltip(tidyselect::contains("Sepal"), Species) %>%
head(1)
p <- iris %>%
dplyr::mutate(Species = stringr::str_to_sentence(Species)) |>
add_tooltip(tidyselect::contains("Sepal"), Species) |>
ggplot() +
geom_point(aes(x = Sepal.Width, y = Sepal.Length, col = Species, text = tooltip))
p
if (requireNamespace("plotly", quietly = TRUE)) {
plotly::ggplotly(p, tooltip = "text")
}
Run the code above in your browser using DataLab