calculates a risk difference and confidence interval with a 95
nice_risk_difference(n1, d1, n2, d2)
Numerator 1
Denominator 1
Numerator 2
Denominator 2
# table 16.2 Kirkwood and Sterne
nice_risk_difference(n1 = 20, d1 = 240, n2 = 80, d2 = 220)
#> $rd
#> [1] -0.280303
#>
#> $se_rd
#> [1] 0.03701524
#>
#> $lci
#> [1] -0.3528529
#>
#> $uci
#> [1] -0.2077532
#>