Add card button module

Provides a button to add views/cards to a report.

For more details see the vignette: vignette("simpleReporter", "teal.reporter").

Usage

add_card_button_ui(id)

add_card_button_srv(id, reporter, card_fun)

Arguments

id

(character(1)) this shiny module's id.

reporter

(Reporter) instance.

card_fun

(function) which returns a ReportCard instance. See Details.

Value

NULL.

Details

The card_fun function is designed to create a new ReportCard instance and optionally customize it:

• The card parameter allows for specifying a custom or default ReportCard instance.

• Use the comment parameter to add a comment to the card via card$append_text() - if card_fun does not have the comment parameter, then comment from Add Card UI module will be added at the end of the content of the card.

• The label parameter enables customization of the card's name and its content through card$append_text()- if card_fun does not have the label parameter, then card name will be set to the name passed in Add Card UI module, but no text will be added to the content of the card.

This module supports using a subclass of ReportCard for added flexibility. A subclass instance should be passed as the default value of the card argument in the card_fun function. See below:

CustomReportCard <- R6::R6Class(
  classname = "CustomReportCard",
  inherit = teal.reporter::ReportCard
)

custom_function <- function(card = CustomReportCard$new()) {
  card
}