m1 <- c(7.4, 6.9)
m2 <- c(6.3, 5.7)
sd1 <- c(1.72, 1.53)
sd2 <- c(2.35, 2.04)
n1 <- c(40, 60)
n2 <- c(40, 60)
meta.ave.mean2(.05, m1, m2, sd1, sd2, n1, n2, bystudy = TRUE)
# Should return:
# Estimate SE LL UL df
# Average 1.15 0.2830183 0.5904369 1.709563 139.41053
# Study 1 1.10 0.4604590 0.1819748 2.018025 71.46729
# Study 2 1.20 0.3292036 0.5475574 1.852443 109.42136
Run the code above in your browser using DataLab