Create a Card Header with Help Popover

Generates a bslib::card_header() with the plot title and a "?" popover containing description and interpretation from av_plot_info. Useful when av_ui_plot_card() cannot be used due to custom card structure (e.g., conditionalPanel inside body).

Usage

av_ui_plot_header(plot_id)

Arguments

plot_id

Character. The ID in av_plot_info for metadata.

Value

A bslib::card_header() shiny.tag.

Examples

# Title and popover text are read from av_plot_info, so a card header cannot
# drift away from the documentation of the plot it sits on.
header <- av_ui_plot_header("enrichment")
class(header)
#> [1] "card_item" "shiny.tag"
grepl("Enrichment Analysis", as.character(header), fixed = TRUE)
#> [1] TRUE