powered by
fitOR()
reportOR(fit,dd,ci)
## generate data dd <- simData(50,2,1.5,123) ## fit the models fit <- fitOR(dd) ## report the results reportOR(fit,dd,0.95)
Run the code above in your browser using DataLab