Create a YTD public report — create_public_report

'create_public_report_ytd' creates a public report for YTD rates.

Usage

create_public_report_ytd(ytd_rates, d_list, config)

Arguments

ytd_rates: Dataframe. YTD case rates per 100k. Must have columns: disease, Current_YTD_Rate_per_100k, Avg_5yr_YTD_Rate_per_100k.
d_list: Dataframe. List of diseases to use for the report. Must have columns: EpiTrax_name, Public_name.
config: List. Settings to use for report.

Value

List containing the report name and data.

Examples

ytd_rates <- data.frame(
  disease = c("A","B"),
  Current_YTD_Rate_per_100k = c(12, 34),
  Avg_5yr_YTD_Rate_per_100k = c(10, 30)
)
d_list <- data.frame(
  EpiTrax_name = c("A","B"),
  Public_name = c("Alpha","Beta")
)
config <- list(generate_csvs = TRUE)
create_public_report_ytd(ytd_rates, d_list, config)
#> $name
#> [1] "public_report_YTD"
#> 
#> $report
#>   Disease YTD_Rate_per_100k Avg_5yr_Rate    Trend
#> 1   Alpha                12           10 Elevated
#> 2    Beta                34           30 Elevated
#>