data(Fleiss93cont)
meta1 <- metacont(n.e, mean.e, sd.e, n.c, mean.c, sd.c, data=Fleiss93cont, sm="SMD")
meta1
meta2 <- metacont(Fleiss93cont$n.e, Fleiss93cont$mean.e,
Fleiss93cont$sd.e,
Fleiss93cont$n.c, Fleiss93cont$mean.c,
Fleiss93cont$sd.c,
sm="SMD")
meta2
Run the code above in your browser using DataLab