n <- c(583, 470, 546, 680)
rel <- c(.91, .89, .90, .89)
meta.ave.cronbach(.05, n, rel, 10, bystudy = TRUE)
# Should return:
# Estimate SE LL UL
# Average 0.8975 0.003256081 0.8911102 0.9038592
# Study 1 0.9100 0.005566064 0.8985763 0.9204108
# Study 2 0.8900 0.007579900 0.8743616 0.9041013
# Study 3 0.9000 0.006391375 0.8868623 0.9119356
# Study 4 0.8900 0.006297549 0.8771189 0.9018203
Run the code above in your browser using DataLab