# NOT RUN {
dat.bangertdrowns2004
# Extracting the effect sizes and sampling variances:
effect <- dat.bangertdrowns2004$yi
v <- dat.bangertdrowns2004$vi
# The weight-function model with no mean model:
weightfunct(effect, v)
# The weight-function model with a mean model:
weightfunct(effect, v, mods=~dat.bangertdrowns2004$info)
# }
Run the code above in your browser using DataLab