Calculate risk ratios and risk differences

risk(data, exposure, outcome, ci_level = 95)

Arguments

data

A dataframe

exposure

Variable giving the levels of the outcome

outcome

Variable giving cases (1) or non-cases (0)

ci_level

a string giving the confidence interval

Value

A dataframe with the risk ratio, risk difference and confidence intervals

Examples

# Data from stratum 1 of table 15-1., p260
dat <- data.frame(
    exposure_var = c(rep(1, 8), rep(0, 5), rep(1, 98), rep(0, 115)),
  outcome_var = c(rep(1, 8), rep(1, 5), rep(0, 98), rep(0, 115)),
  stringsAsFactors = FALSE
)
risk(data = dat, exposure = exposure_var, outcome = outcome_var)
#> # A tibble: 2 × 10
#>   exposure_var     n outcome  risk risk_ratio rr_lci rr_uci risk_diff rd_lci
#>          <dbl> <int>   <dbl> <dbl>      <dbl>  <dbl>  <dbl>     <dbl>  <dbl>
#> 1            0   120       5  4.17       1     0.337   2.96      0     -6.20
#> 2            1   106       8  7.55       1.81  0.611   5.37      3.38  -2.82
#> # ℹ 1 more variable: rd_uci <dbl>