Tek inn ei dataramme og lagar ein HTML-tabell med oversikt over ulike nøkkeltal for aktivitet.
lag_aktivitetsoversikt(d)
HTML-tabell med aktivitetsoversikt per dags dato i registeret.
if (FALSE) { # \dontrun{
d = hent_skjema("ventreg") |>
legg_til_pasientid(mceid) |>
legg_til_pasientinfo(patient_id) |>
legg_til_stoppinfo(mceid) |>
legg_til_aktiv_behandling() |>
mutate(
alder_no = lubridate::time_length(
x = lubridate::interval(
start = birth_date,
end = Sys.Date()
),
unit = "years"
)
)
lag_aktivitetsoversikt(d)
} # }