# NOT RUN {
m1 <- c(15,12,29,42,14,44,14,29,10,17,38,19,21)
n1 <- c(16,16,34,56,22,54,17,58,14,26,44,29,38)
m2 <- c( 9, 1,18,31, 6,17, 7,23, 3, 6,12,22,19)
n2 <- c(16,16,34,56,22,55,15,58,15,27,45,30,38)
dat <- pimeta::convert_bin(m1, n1, m2, n2, type = "logOR")
# }
# NOT RUN {
pimeta::pima(dat$y, dat$se)
# }
Run the code above in your browser using DataLab