This function calculates the odds ratio and relative risk for a 2 x 2
contingency table and a
confidence interval (default conf.level
is 95 percent) for the
each estimate. x
should be a matrix, data frame or table. "Successes"
should be located in column 1 of x
, and the treatment of interest
should be located in row 2. The odds ratio is calculated as (Odds row 2) /
(Odds row 1). The confidence interval is calculated from the log(OR) and
backtransformed.
orrr(x, conf.level = 0.95, verbose = !quiet, quiet = TRUE, digits = 3,
relrisk = FALSE)oddsRatio(x, conf.level = 0.95, verbose = !quiet, quiet = TRUE,
digits = 3)
relrisk(x, conf.level = 0.95, verbose = !quiet, quiet = TRUE,
digits = 3)
# S3 method for oddsRatio
print(x, digits = 4, ...)
# S3 method for relrisk
print(x, digits = 4, ...)
# S3 method for oddsRatio
summary(object, digits = 4, ...)
# S3 method for relrisk
summary(object, digits = 4, ...)
a 2 X 2 matrix, data frame or table of counts
the confidence interval level
a logical indicating whether verbose output should be displayed
a logical indicating whether verbose outoput should be supressed
number of digits to display
a logical indicating whether the relative risk should be returned instead of the odds ratio
additional arguments
an R object to print or summarise. Here an object of class
"oddsRatio"
or "relrisk"
.
an odds ratio or relative risk. If verpose
is true,
more details and the confidence intervals are displayed.
# NOT RUN {
M1 <- matrix(c(14, 38, 51, 11), nrow = 2)
M1
oddsRatio(M1)
M2 <- matrix(c(18515, 18496, 1427, 1438), nrow = 2)
rownames(M2) <- c("Placebo", "Aspirin")
colnames(M2) <- c("No", "Yes")
M2
oddsRatio(M2)
oddsRatio(M2, verbose=TRUE)
relrisk(M2, verbose=TRUE)
if (require(mosaicData)) {
relrisk(tally(~ homeless + sex, data=HELPrct) )
do(3) * relrisk( tally( ~ homeless + shuffle(sex), data=HELPrct) )
}
# }
Run the code above in your browser using DataLab