n <- c(150, 200, 300, 200, 350)
cor <- c(.14, .29, .16, .21, .23)
meta.ave.spear(.05, n, cor, bystudy = TRUE)
# Should return:
# Estimate SE LL UL
# Average 0.206 0.02944265 0.14763960 0.2629309
# Study 1 0.140 0.08031750 -0.02151639 0.2943944
# Study 2 0.290 0.06492643 0.15476515 0.4145671
# Study 3 0.160 0.05635101 0.04689807 0.2690514
# Study 4 0.210 0.06776195 0.07187439 0.3402225
# Study 5 0.230 0.05069710 0.12690280 0.3281809
Run the code above in your browser using DataLab