A child of ReportCard
that is used for teal specific applications.
In addition to the parent methods, it supports rendering teal specific elements such as
the source code, the encodings panel content and the filter panel content as part of the
meta data.
Super class
teal.reporter::ReportCard
-> TealReportCard
Methods
Inherited methods
teal.reporter::ReportCard$append_content()
teal.reporter::ReportCard$append_metadata()
teal.reporter::ReportCard$append_plot()
teal.reporter::ReportCard$append_table()
teal.reporter::ReportCard$append_text()
teal.reporter::ReportCard$from_list()
teal.reporter::ReportCard$get_content()
teal.reporter::ReportCard$get_metadata()
teal.reporter::ReportCard$get_name()
teal.reporter::ReportCard$initialize()
teal.reporter::ReportCard$reset()
teal.reporter::ReportCard$set_name()
teal.reporter::ReportCard$to_list()
Method append_src()
Appends the source code to the content
meta data of this TealReportCard
.
Examples
card <- TealReportCard$new()$append_src(
"ggplot2::ggplot(iris, ggplot2::aes(x = Petal.Length)) + ggplot2::geom_histogram()"
)
card$get_content()[[1]]$get_content()
Method append_fs()
Appends the filter state list to the content
and metadata
of this TealReportCard
.
If the filter state list has an attribute named formatted
, it appends it to the card otherwise it uses
the default yaml::as.yaml
to format the list.
If the filter state list is empty, nothing is appended to the content
.
Examples
card <- TealReportCard$new()$append_fs(list(a = 1, b = 2))
card$get_content()[[1]]$get_content()
Method append_encodings()
Appends the encodings list to the content
and metadata
of this TealReportCard
.
Examples
card <- TealReportCard$new()$append_encodings(list(variable1 = "X"))
card$get_content()[[1]]$get_content()
Examples
## ------------------------------------------------
## Method `TealReportCard$append_src`
## ------------------------------------------------
card <- TealReportCard$new()$append_src(
"ggplot2::ggplot(iris, ggplot2::aes(x = Petal.Length)) + ggplot2::geom_histogram()"
)
card$get_content()[[1]]$get_content()
#> [1] "Show R Code"
## ------------------------------------------------
## Method `TealReportCard$append_fs`
## ------------------------------------------------
card <- TealReportCard$new()$append_fs(list(a = 1, b = 2))
card$get_content()[[1]]$get_content()
#> [1] "Filter State"
## ------------------------------------------------
## Method `TealReportCard$append_encodings`
## ------------------------------------------------
card <- TealReportCard$new()$append_encodings(list(variable1 = "X"))
card$get_content()[[1]]$get_content()
#> [1] "Selected Options"