From 036d63713f59e45814e8b268f6b192bee0242e46 Mon Sep 17 00:00:00 2001 From: github-actions <41898282+github-actions[bot]@users.noreply.github.com> Date: Wed, 4 Sep 2024 23:45:11 +0000 Subject: [PATCH] [skip style] [skip vbump] Restyle files --- R/h_incidence_rate.R | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/R/h_incidence_rate.R b/R/h_incidence_rate.R index da5a0a5ea8..26558d5fc0 100644 --- a/R/h_incidence_rate.R +++ b/R/h_incidence_rate.R @@ -121,10 +121,10 @@ h_incidence_rate <- function(person_years, control = control_incidence_rate()) { alpha <- 1 - control$conf_level est <- switch(control$conf_type, - normal = h_incidence_rate_normal(person_years, n_events, alpha), - normal_log = h_incidence_rate_normal_log(person_years, n_events, alpha), - exact = h_incidence_rate_exact(person_years, n_events, alpha), - byar = h_incidence_rate_byar(person_years, n_events, alpha) + normal = h_incidence_rate_normal(person_years, n_events, alpha), + normal_log = h_incidence_rate_normal_log(person_years, n_events, alpha), + exact = h_incidence_rate_exact(person_years, n_events, alpha), + byar = h_incidence_rate_byar(person_years, n_events, alpha) ) num_pt_year <- control$num_pt_year