## ------------------------------------------------------------------------
library(AUtests)
# Example data, 1:3 case-control ratio
perm.tests(15000, 5000, 45, 55)

## ------------------------------------------------------------------------
basic.tests(15000, 5000, 45, 55)

## ------------------------------------------------------------------------
# Example data, balanced case-control ratio
au.tests(10000, 10000, 45, 60)
au.firth(10000, 10000, 45, 60)

## ------------------------------------------------------------------------
m0list = c(500, 1250) # controls 
m1list = c(150, 100) # cases 
r0list = c(60, 20) # exposed controls
r1list = c(25, 5) # exposed cases

## ------------------------------------------------------------------------
perm.tests(1750, 250, 80, 30)
au.tests(1750, 250, 80, 30)

## ------------------------------------------------------------------------
perm.test.strat(m0list, m1list, r0list, r1list)
au.test.strat(m0list, m1list, r0list, r1list)