diff --git a/R/shinyDiagnostics.R b/R/shinyDiagnostics.R index cff1b38..5993d9a 100644 --- a/R/shinyDiagnostics.R +++ b/R/shinyDiagnostics.R @@ -14,6 +14,11 @@ shinyDiagnostics <- function(result, rlang::check_installed("omopViewer") result |> - omopViewer::exportStaticApp(directory = directory) - + omopViewer::exportStaticApp( + directory = directory, + background = c( + "header" = "phenotypeR diagnostics", + "body" = "This Shiny App contains results generated by the (phenotypeR)[https://ohdsi.github.io/phenotypeR/] package (version {as.character(utils::packageVersion('CohortCharacteristics'))}) to support the assessment of cohorts in the OMOP CDM." |> glue::glue() + ) + ) }