est <- c(.022, .751, .421, .287, .052, .146, .562, .904)
se <- c(.124, .464, .102, .592, .864, .241, .252, .318)
meta.ave.gen.rc(.05, est, se, bystudy = TRUE)
# Should return:
# Estimate SE LL UL
# Tau-squared 0.03772628 0.0518109 0.00000000 0.1392738
# Average 0.35394806 0.1155239 0.12752528 0.5803708
# Study 1 0.02200000 0.1240000 -0.22103553 0.2650355
# Study 2 0.75100000 0.4640000 -0.15842329 1.6604233
# Study 3 0.42100000 0.1020000 0.22108367 0.6209163
# Study 4 0.28700000 0.5920000 -0.87329868 1.4472987
# Study 5 0.05200000 0.8640000 -1.64140888 1.7454089
# Study 6 0.14600000 0.2410000 -0.32635132 0.6183513
# Study 7 0.56200000 0.2520000 0.06808908 1.0559109
# Study 8 0.90400000 0.3180000 0.28073145 1.5272685
Run the code above in your browser using DataLab