library(metaSEM)

# reads in csv files containing results from each individual site.
combinedresults1 <- read.csv("combinedresults1.csv")
combinedresults2 <- read.csv("combinedresults2.csv")
combinedresults3 <- read.csv("combinedresults3.csv")

# analyses repeated for each set of exclusion critera
# three-level random-effects meta-analysis in MetaSEM
summary( meta3(y=yi, v=vi, cluster=location, data=combinedresults1))
summary( meta3(y=yi, v=vi, cluster=location, data=combinedresults2))
summary( meta3(y=yi, v=vi, cluster=location, data=combinedresults3))

# note OpenMX status1: 5 for the first two