sen.ci(d, mm = c(2, 2, 2), gamma = 1, alpha = 0.05, alpha.up = alpha/2, alpha.low = alpha/2, score.method = c("approximate", "exact"))
mm
senmwCI
sensitivitymw
data(lead) d.lead <- lead$exposed[-21] - lead$control[-21] sen.ci(d.lead, gamma = c(1, 2), alpha.up = 0, alpha.low = 0.05)
Run the code above in your browser using DataCamp Workspace