# Superiority test
getDesignRiskDiffExact(n = 50, pi1 = 0.6, pi2 = 0.25, alpha = 0.025)
# Non-inferiority test
getDesignRiskDiffExact(beta = 0.2, riskDiffH0 = -0.3,
pi1 = 0.9, pi2 = 0.9, alpha = 0.025)
Run the code above in your browser using DataLab