data/Gleser94.R

In mikewlcheung/metasem: Meta-Analysis using Structural Equation Modeling

Gleser94 <-
structure(list(MTS = structure(list(Study = c(1, 2, 3, 4, 5, 
6), N.C = c(25, 40, 30, 50, 30, 100), N.E1 = c(22, NA, NA, NA, 
30, 100), N.E2 = c(25, 38, 30, 50, 30, NA), N.E3 = c(23, 37, 
NA, NA, 28, NA), N.E4 = c(NA, 40, 28, NA, 26, NA), N.E5 = c(NA, 
NA, NA, 50, NA, NA), Mean.C = c(150.96, 149.94, 152.45, 149.49, 
150.36, 150.19), Mean.E1 = c(144.14, NA, NA, NA, 144.55, 145.62
), Mean.E2 = c(139.92, 141.23, 140.8, 140.69, 140.32, NA), Mean.E3 = c(139.32, 
137.36, NA, NA, 138.34, NA), Mean.E4 = c(NA, 136.44, 136.14, 
NA, 134.69, NA), Mean.E5 = c(NA, NA, NA, 135.39, NA, NA), SD.C = c(8.44, 
6.88, 6.35, 6.92, 4.96, 6.71), SD.E1 = c(4.25, NA, NA, NA, 5.58, 
5.06), SD.E2 = c(5.06, 5.11, 4.52, 5.33, 4.16, NA), SD.E3 = c(3.6, 
5.29, NA, NA, 5.76, NA), SD.E4 = c(NA, 3.34, 3.35, NA, 4.05, 
NA), SD.E5 = c(NA, NA, NA, 3.35, NA, NA)), .Names = c("Study", 
"N.C", "N.E1", "N.E2", "N.E3", "N.E4", "N.E5", "Mean.C", "Mean.E1", 
"Mean.E2", "Mean.E3", "Mean.E4", "Mean.E5", "SD.C", "SD.E1", 
"SD.E2", "SD.E3", "SD.E4", "SD.E5"), row.names = c(NA, -6L), class = "data.frame"), 
    MES = structure(list(Study = c(1, 2, 3, 4, 5, 6, 7), N.Uncoached = c(34, 
    17, 52, 14, 47, 45, 8), N.Coached = c(21, 16, 52, 13, 93, 
    45, 8), Mean.Uncoached.Math = c(510, 383, 475.32, 431.43, 
    512, 630.44, 342.5), Mean.Uncoached.Verbal = c(503, 385, 
    451.15, 393.57, 462, 597.47, 250), Mean.Coached.Math = c(620, 
    446, 469.32, 423.31, 540, 641.94, 290), Mean.Coached.Verbal = c(561, 
    375, 462.12, 436.15, 443, 607.22, 293.75), SD.Uncoached.Math = c(83.6, 
    82.9, 88.97, 83.47, 72, 70.02, 65.19), SD.Uncoached.Verbal = c(102.4, 
    73.3, 86.19, 102.48, 78, 72.86, 29.28), SD.Coached.Math = c(102.5, 
    104.7, 96.38, 115.48, 76, 56.94, 35.05), SD.Coached.Verbal = c(78.5, 
    56.7, 89.62, 100.04, 76, 72.1, 92.42), Cor.Math.Verbal = c(0.66, 
    0.66, 0.66, 0.66, 0.66, 0.66, 0.66)), .Names = c("Study", 
    "N.Uncoached", "N.Coached", "Mean.Uncoached.Math", "Mean.Uncoached.Verbal", 
    "Mean.Coached.Math", "Mean.Coached.Verbal", "SD.Uncoached.Math", 
    "SD.Uncoached.Verbal", "SD.Coached.Math", "SD.Coached.Verbal", 
    "Cor.Math.Verbal"), row.names = c(NA, -7L), class = "data.frame")), .Names = c("MTS", 
"MES"))