data(Olkin95)
meta1 <- metabin(event.e, n.e, event.c, n.c,
data=Olkin95, subset=1:10,
sm="RR", method="I")
##
## Using function metabias.meta:
##
metabias(meta1)
##
## Same result using function metabias.default:
##
metabias(meta1$TE, meta1$seTE)
Run the code above in your browser using DataLab