data/Cheung09.R

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

Cheung09 <-
structure(list(data = structure(list(`1` = structure(c(0.77298, 
0.26975, 0.24009, 0.23778, 0.20869, 0.22377, 0.18801, 0.07055, 
0.10051, 0.26975, 0.91307, 0.44374, 0.26083, 0.28387, 0.2066, 
0.12764, 0.22892, 0.0959, 0.24009, 0.44374, 1.11292, 0.2944, 
0.26262, 0.2732, 0.18548, 0.20417, 0.18243, 0.23778, 0.26083, 
0.2944, 0.80501, 0.47489, 0.45939, 0.40998, 0.09104, 0.10142, 
0.20869, 0.28387, 0.26262, 0.47489, 0.89692, 0.41972, 0.31541, 
0.33907, 0.06561, 0.22377, 0.2066, 0.2732, 0.45939, 0.41972, 
1.36089, 0.74274, 0.18137, 0.12973, 0.18801, 0.12764, 0.18548, 
0.40998, 0.31541, 0.74274, 1.01075, 0.13724, 0.12776, 0.07055, 
0.22892, 0.20417, 0.09104, 0.33907, 0.18137, 0.13724, 1.81805, 
-0.0198, 0.10051, 0.0959, 0.18243, 0.10142, 0.06561, 0.12973, 
0.12776, -0.0198, 0.91252), .Dim = c(9L, 9L), .Dimnames = list(
    c("x1", "x2", "x3", "x4", "x5", "x6", "x7", "x8", "x9"), 
    c("x1", "x2", "x3", "x4", "x5", "x6", "x7", "x8", "x9"))), 
    `2` = structure(c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 1.06293, 0.27094, 
    0.20331, 0.16522, 0.11922, 0.25387, 0.06877, NA, NA, 0.27094, 
    0.73625, 0.27053, 0.33506, 0.33495, 0.16124, 0.00912, NA, 
    NA, 0.20331, 0.27053, 0.71718, 0.19873, 0.14582, 0.21907, 
    0.04089, NA, NA, 0.16522, 0.33506, 0.19873, 0.92247, 0.55128, 
    0.17143, 0.0138, NA, NA, 0.11922, 0.33495, 0.14582, 0.55128, 
    1.00462, 0.16561, 0.04322, NA, NA, 0.25387, 0.16124, 0.21907, 
    0.17143, 0.16561, 1.49431, 0.29094, NA, NA, 0.06877, 0.00912, 
    0.04089, 0.0138, 0.04322, 0.29094, 1.0196), .Dim = c(9L, 
    9L), .Dimnames = list(c("x1", "x2", "x3", "x4", "x5", "x6", 
    "x7", "x8", "x9"), c("x1", "x2", "x3", "x4", "x5", "x6", 
    "x7", "x8", "x9"))), `3` = structure(c(0.95825, 0.32958, 
    NA, NA, NA, 0.13948, 0.15463, 0.15248, 0.10405, 0.32958, 
    1.02277, NA, NA, NA, 0.073, 0.07002, 0.17056, 0.13502, NA, 
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 0.13948, 0.073, 
    NA, NA, NA, 0.82987, 0.43769, 0.23195, 0.03856, 0.15463, 
    0.07002, NA, NA, NA, 0.43769, 0.83476, 0.19002, 0.03986, 
    0.15248, 0.17056, NA, NA, NA, 0.23195, 0.19002, 1.42583, 
    0.38343, 0.10405, 0.13502, NA, NA, NA, 0.03856, 0.03986, 
    0.38343, 1.03062), .Dim = c(9L, 9L), .Dimnames = list(c("x1", 
    "x2", "x3", "x4", "x5", "x6", "x7", "x8", "x9"), c("x1", 
    "x2", "x3", "x4", "x5", "x6", "x7", "x8", "x9"))), `4` = structure(c(0.83995, 
    0.21117, 0.14249, 0.13268, 0.17861, 0.22783, 0.18991, NA, 
    NA, 0.21117, 0.9338, 0.34383, 0.1904, 0.15068, 0.12191, -0.04762, 
    NA, NA, 0.14249, 0.34383, 1.33025, 0.31041, 0.10873, 0.19756, 
    0.12113, NA, NA, 0.13268, 0.1904, 0.31041, 0.77512, 0.36093, 
    0.36519, 0.22716, NA, NA, 0.17861, 0.15068, 0.10873, 0.36093, 
    0.91598, 0.37035, 0.1955, NA, NA, 0.22783, 0.12191, 0.19756, 
    0.36519, 0.37035, 1.48445, 0.62637, NA, NA, 0.18991, -0.04762, 
    0.12113, 0.22716, 0.1955, 0.62637, 1.05049, NA, NA, NA, NA, 
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 
    NA), .Dim = c(9L, 9L), .Dimnames = list(c("x1", "x2", "x3", 
    "x4", "x5", "x6", "x7", "x8", "x9"), c("x1", "x2", "x3", 
    "x4", "x5", "x6", "x7", "x8", "x9")))), .Names = c("1", "2", 
"3", "4")), n = c(591, 656, 832, 823)), .Names = c("data", "n"
))