SmartCane/test_render_90.R

23 lines
548 B
R

# Test rendering of 90 report
library(rmarkdown)
# Use "john" project since it has the KPI data we just created
render(
input = "r_app/90_CI_report_with_kpis_agronomic_support.Rmd",
params = list(
data_dir = "john",
report_date = "2026-02-04",
mail_day = "Monday",
borders = FALSE,
ci_plot_type = "mosaic",
colorblind_friendly = FALSE,
facet_by_season = FALSE,
x_axis_unit = "days"
),
output_file = "test_90_john_2026_02_04.docx",
output_dir = "output",
quiet = FALSE
)
cat("\n✓ Report rendered!\n")