data(smoking)
m1 <- metainc(d.smokers, py.smokers, d.nonsmokers, py.nonsmokers,
data = smoking, studlab = study)
print(m1, digits = 2)
data(lungcancer)
m2 <- metainc(d.smokers, py.smokers, d.nonsmokers, py.nonsmokers,
data = lungcancer, studlab = study)
print(m2, digits = 2)
Run the code above in your browser using DataLab