# predictor X follows normal distribution
## probability specification
pwrss.z.logreg(p0 = 0.15, p1 = 0.10,
alpha = 0.05, power = 0.80,
dist = "normal")
## odds ratio specification
pwrss.z.logreg(p0 = 0.15, odds.ratio = 0.6296,
alpha = 0.05, power = 0.80,
dist = "normal")
## regression coefficient specification
pwrss.z.logreg(p0 = 0.15, beta1 = -0.4626,
alpha = 0.05, power = 0.80,
dist = "normal")
## change parameters associated with predictor X
dist.x <- list(dist = "normal", mean = 10, sd = 2)
pwrss.z.logreg(p0 = 0.15, beta1 = -0.4626,
alpha = 0.05, power = 0.80,
dist = dist.x)
# predictor X follows Bernoulli distribution (such as treatment/control groups)
## probability specification
pwrss.z.logreg(p0 = 0.15, p1 = 0.10,
alpha = 0.05, power = 0.80,
dist = "bernoulli")
## odds ratio specification
pwrss.z.logreg(p0 = 0.15, odds.ratio = 0.6296,
alpha = 0.05, power = 0.80,
dist = "bernoulli")
## regression coefficient specification
pwrss.z.logreg(p0 = 0.15, beta1 = -0.4626,
alpha = 0.05, power = 0.80,
dist = "bernoulli")
## change parameters associated with predictor X
dist.x <- list(dist = "bernoulli", prob = 0.30)
pwrss.z.logreg(p0 = 0.15, beta1 = -0.4626,
alpha = 0.05, power = 0.80,
dist = dist.x)
Run the code above in your browser using DataLab