\newpage

write(formats2h2("Generate the time-flow subsection"), stderr())

r h1_timeflow

r h2_calendar_heatmap

if (nrow(tf_data) > 0) {
  timci::generate_calendar_heatmap2(tf_data,
                                    date,
                                    legendtitle = "Number of submissions")
}
if (nrow(tf_data) > 0) {
  timci::heatmap_wday_hourofday(tf_data,
                                'start')
}


SwissTPH/timci documentation built on April 11, 2024, 8:31 a.m.