Roorda11 <-
structure(list(data = list(structure(c(1, -0.54, NA, 0.18, -0.54,
1, NA, -0.29, NA, NA, NA, NA, 0.18, -0.29, NA, 1), .Dim = c(4L,
4L), .Dimnames = list(c("pos", "neg", "enga", "achiev"), c("pos",
"neg", "enga", "achiev"))), structure(c(1, NA, 0.64, 0.29, NA,
NA, NA, NA, 0.64, NA, 1, 0.23, 0.29, NA, 0.23, 1), .Dim = c(4L,
4L), .Dimnames = list(c("pos", "neg", "enga", "achiev"), c("pos",
"neg", "enga", "achiev"))), structure(c(1, NA, 0.29, NA, NA,
NA, NA, NA, 0.29, NA, 1, NA, NA, NA, NA, NA), .Dim = c(4L, 4L
), .Dimnames = list(c("pos", "neg", "enga", "achiev"), c("pos",
"neg", "enga", "achiev"))), structure(c(1, NA, 0.29, NA, NA,
NA, NA, NA, 0.29, NA, 1, NA, NA, NA, NA, NA), .Dim = c(4L, 4L
), .Dimnames = list(c("pos", "neg", "enga", "achiev"), c("pos",
"neg", "enga", "achiev"))), structure(c(NA, NA, 0.22, 0.08, NA,
1, -0.45, -0.24, 0.22, -0.45, NA, NA, 0.08, -0.24, NA, 1), .Dim = c(4L,
4L), .Dimnames = list(c("pos", "neg", "enga", "achiev"), c("pos",
"neg", "enga", "achiev"))), structure(c(1, NA, 0.06, -0.09, NA,
NA, NA, NA, 0.06, NA, 1, 0.2, -0.09, NA, 0.2, 1), .Dim = c(4L,
4L), .Dimnames = list(c("pos", "neg", "enga", "achiev"), c("pos",
"neg", "enga", "achiev"))), structure(c(1, NA, NA, 0.18, NA,
NA, NA, NA, NA, NA, NA, NA, 0.18, NA, NA, 1), .Dim = c(4L, 4L
), .Dimnames = list(c("pos", "neg", "enga", "achiev"), c("pos",
"neg", "enga", "achiev"))), structure(c(1, NA, 0.43, NA, NA,
NA, NA, NA, 0.43, NA, 1, NA, NA, NA, NA, NA), .Dim = c(4L, 4L
), .Dimnames = list(c("pos", "neg", "enga", "achiev"), c("pos",
"neg", "enga", "achiev"))), structure(c(1, NA, 0.43, NA, NA,
NA, NA, NA, 0.43, NA, 1, NA, NA, NA, NA, NA), .Dim = c(4L, 4L
), .Dimnames = list(c("pos", "neg", "enga", "achiev"), c("pos",
"neg", "enga", "achiev"))), structure(c(1, NA, NA, -0.01, NA,
NA, NA, NA, NA, NA, NA, NA, -0.01, NA, NA, 1), .Dim = c(4L, 4L
), .Dimnames = list(c("pos", "neg", "enga", "achiev"), c("pos",
"neg", "enga", "achiev"))), structure(c(1, NA, 0.35, NA, NA,
NA, NA, NA, 0.35, NA, 1, NA, NA, NA, NA, NA), .Dim = c(4L, 4L
), .Dimnames = list(c("pos", "neg", "enga", "achiev"), c("pos",
"neg", "enga", "achiev"))), structure(c(1, -0.11, NA, 0.31, -0.11,
1, NA, -0.25, NA, NA, NA, NA, 0.31, -0.25, NA, 1), .Dim = c(4L,
4L), .Dimnames = list(c("pos", "neg", "enga", "achiev"), c("pos",
"neg", "enga", "achiev"))), structure(c(1, NA, 0.35, 0.01, NA,
NA, NA, NA, 0.35, NA, NA, NA, 0.01, NA, NA, 1), .Dim = c(4L,
4L), .Dimnames = list(c("pos", "neg", "enga", "achiev"), c("pos",
"neg", "enga", "achiev"))), structure(c(1, NA, NA, 0.04, NA,
NA, NA, NA, NA, NA, NA, NA, 0.04, NA, NA, 1), .Dim = c(4L, 4L
), .Dimnames = list(c("pos", "neg", "enga", "achiev"), c("pos",
"neg", "enga", "achiev"))), structure(c(NA, NA, NA, 0.05, NA,
1, NA, -0.13, NA, NA, NA, NA, 0.05, -0.13, NA, 1), .Dim = c(4L,
4L), .Dimnames = list(c("pos", "neg", "enga", "achiev"), c("pos",
"neg", "enga", "achiev"))), structure(c(1, -0.26, 0.2, 0.07,
-0.26, 1, -0.36, -0.21, 0.2, -0.36, 1, 0.27, 0.07, -0.21, 0.27,
1), .Dim = c(4L, 4L), .Dimnames = list(c("pos", "neg", "enga",
"achiev"), c("pos", "neg", "enga", "achiev"))), structure(c(NA,
NA, NA, NA, NA, 1, NA, -0.1, NA, NA, NA, NA, NA, -0.1, NA, 1), .Dim = c(4L,
4L), .Dimnames = list(c("pos", "neg", "enga", "achiev"), c("pos",
"neg", "enga", "achiev"))), structure(c(1, -0.34, NA, 0.21, -0.34,
1, NA, -0.02, NA, NA, NA, NA, 0.21, -0.02, NA, 1), .Dim = c(4L,
4L), .Dimnames = list(c("pos", "neg", "enga", "achiev"), c("pos",
"neg", "enga", "achiev"))), structure(c(1, NA, 0.22, NA, NA,
NA, NA, NA, 0.22, NA, 1, NA, NA, NA, NA, NA), .Dim = c(4L, 4L
), .Dimnames = list(c("pos", "neg", "enga", "achiev"), c("pos",
"neg", "enga", "achiev"))), structure(c(NA, NA, NA, 0.33, NA,
NA, NA, NA, NA, NA, 1, 0.56, 0.33, NA, 0.56, 1), .Dim = c(4L,
4L), .Dimnames = list(c("pos", "neg", "enga", "achiev"), c("pos",
"neg", "enga", "achiev"))), structure(c(1, -0.31, 0.17, 0.09,
-0.31, 1, -0.19, -0.14, 0.17, -0.19, 1, 0.2, 0.09, -0.14, 0.2,
1), .Dim = c(4L, 4L), .Dimnames = list(c("pos", "neg", "enga",
"achiev"), c("pos", "neg", "enga", "achiev"))), structure(c(1,
0, NA, 0.06, 0, 1, NA, -0.27, NA, NA, NA, NA, 0.06, -0.27, NA,
1), .Dim = c(4L, 4L), .Dimnames = list(c("pos", "neg", "enga",
"achiev"), c("pos", "neg", "enga", "achiev"))), structure(c(1,
NA, NA, 0.11, NA, NA, NA, NA, NA, NA, NA, NA, 0.11, NA, NA, 1
), .Dim = c(4L, 4L), .Dimnames = list(c("pos", "neg", "enga",
"achiev"), c("pos", "neg", "enga", "achiev"))), structure(c(1,
-0.21, 0.21, NA, -0.21, 1, -0.18, NA, 0.21, -0.18, 1, NA, NA,
NA, NA, NA), .Dim = c(4L, 4L), .Dimnames = list(c("pos", "neg",
"enga", "achiev"), c("pos", "neg", "enga", "achiev"))), structure(c(1,
-0.36, 0.54, 0.13, -0.36, 1, -0.42, -0.25, 0.54, -0.42, 1, 0.32,
0.13, -0.25, 0.32, 1), .Dim = c(4L, 4L), .Dimnames = list(c("pos",
"neg", "enga", "achiev"), c("pos", "neg", "enga", "achiev"))),
structure(c(1, -0.31, 0.18, NA, -0.31, 1, -0.22, NA, 0.18,
-0.22, 1, NA, NA, NA, NA, NA), .Dim = c(4L, 4L), .Dimnames = list(
c("pos", "neg", "enga", "achiev"), c("pos", "neg", "enga",
"achiev"))), structure(c(1, -0.17, 0.18, 0.22, -0.17,
1, -0.43, -0.34, 0.18, -0.43, 1, 0.37, 0.22, -0.34, 0.37,
1), .Dim = c(4L, 4L), .Dimnames = list(c("pos", "neg", "enga",
"achiev"), c("pos", "neg", "enga", "achiev"))), structure(c(1,
-0.18, NA, 0.22, -0.18, 1, NA, -0.06, NA, NA, NA, NA, 0.22,
-0.06, NA, 1), .Dim = c(4L, 4L), .Dimnames = list(c("pos",
"neg", "enga", "achiev"), c("pos", "neg", "enga", "achiev"
))), structure(c(NA, NA, 0.07, NA, NA, 1, -0.18, NA, 0.07,
-0.18, 1, NA, NA, NA, NA, NA), .Dim = c(4L, 4L), .Dimnames = list(
c("pos", "neg", "enga", "achiev"), c("pos", "neg", "enga",
"achiev"))), structure(c(NA, NA, NA, NA, NA, NA, NA,
-0.14, NA, NA, 1, 0.29, NA, -0.14, 0.29, 1), .Dim = c(4L,
4L), .Dimnames = list(c("pos", "neg", "enga", "achiev"),
c("pos", "neg", "enga", "achiev"))), structure(c(1, -0.3,
NA, 0.33, -0.3, 1, NA, -0.32, NA, NA, NA, NA, 0.33, -0.32,
NA, 1), .Dim = c(4L, 4L), .Dimnames = list(c("pos", "neg",
"enga", "achiev"), c("pos", "neg", "enga", "achiev"))), structure(c(1,
NA, 0.14, NA, NA, NA, NA, NA, 0.14, NA, 1, NA, NA, NA, NA,
NA), .Dim = c(4L, 4L), .Dimnames = list(c("pos", "neg", "enga",
"achiev"), c("pos", "neg", "enga", "achiev"))), structure(c(NA,
NA, 0.34, 0.38, NA, 1, -0.33, -0.37, 0.34, -0.33, NA, NA,
0.38, -0.37, NA, 1), .Dim = c(4L, 4L), .Dimnames = list(c("pos",
"neg", "enga", "achiev"), c("pos", "neg", "enga", "achiev"
))), structure(c(1, -0.31, 0.31, 0.11, -0.31, NA, NA, NA,
0.31, NA, NA, NA, 0.11, NA, NA, 1), .Dim = c(4L, 4L), .Dimnames = list(
c("pos", "neg", "enga", "achiev"), c("pos", "neg", "enga",
"achiev"))), structure(c(NA, NA, NA, NA, NA, 1, -0.52,
-0.18, NA, -0.52, 1, 0.44, NA, -0.18, 0.44, 1), .Dim = c(4L,
4L), .Dimnames = list(c("pos", "neg", "enga", "achiev"),
c("pos", "neg", "enga", "achiev"))), structure(c(1, NA,
NA, 0.2, NA, NA, NA, NA, NA, NA, NA, NA, 0.2, NA, NA, 1), .Dim = c(4L,
4L), .Dimnames = list(c("pos", "neg", "enga", "achiev"),
c("pos", "neg", "enga", "achiev"))), structure(c(1, NA,
0.63, NA, NA, NA, NA, NA, 0.63, NA, 1, NA, NA, NA, NA, NA
), .Dim = c(4L, 4L), .Dimnames = list(c("pos", "neg", "enga",
"achiev"), c("pos", "neg", "enga", "achiev"))), structure(c(1,
NA, 0.15, 0.06, NA, NA, NA, NA, 0.15, NA, 1, 0.08, 0.06,
NA, 0.08, 1), .Dim = c(4L, 4L), .Dimnames = list(c("pos",
"neg", "enga", "achiev"), c("pos", "neg", "enga", "achiev"
))), structure(c(1, NA, 0.44, 0.32, NA, NA, NA, NA, 0.44,
NA, 1, 0.43, 0.32, NA, 0.43, 1), .Dim = c(4L, 4L), .Dimnames = list(
c("pos", "neg", "enga", "achiev"), c("pos", "neg", "enga",
"achiev"))), structure(c(1, -0.37, NA, 0.26, -0.37, 1,
NA, 0.04, NA, NA, NA, NA, 0.26, 0.04, NA, 1), .Dim = c(4L,
4L), .Dimnames = list(c("pos", "neg", "enga", "achiev"),
c("pos", "neg", "enga", "achiev"))), structure(c(1, NA,
0.58, 0.1, NA, NA, NA, NA, 0.58, NA, 1, 0.06, 0.1, NA, 0.06,
1), .Dim = c(4L, 4L), .Dimnames = list(c("pos", "neg", "enga",
"achiev"), c("pos", "neg", "enga", "achiev"))), structure(c(1,
NA, 0.18, NA, NA, NA, NA, NA, 0.18, NA, 1, NA, NA, NA, NA,
NA), .Dim = c(4L, 4L), .Dimnames = list(c("pos", "neg", "enga",
"achiev"), c("pos", "neg", "enga", "achiev"))), structure(c(1,
0, NA, 0.17, 0, 1, NA, -0.16, NA, NA, NA, NA, 0.17, -0.16,
NA, 1), .Dim = c(4L, 4L), .Dimnames = list(c("pos", "neg",
"enga", "achiev"), c("pos", "neg", "enga", "achiev"))), structure(c(1,
0, NA, 0.1, 0, 1, NA, -0.24, NA, NA, NA, NA, 0.1, -0.24,
NA, 1), .Dim = c(4L, 4L), .Dimnames = list(c("pos", "neg",
"enga", "achiev"), c("pos", "neg", "enga", "achiev"))), structure(c(1,
NA, 0.18, 0.04, NA, NA, NA, NA, 0.18, NA, 1, 0.22, 0.04,
NA, 0.22, 1), .Dim = c(4L, 4L), .Dimnames = list(c("pos",
"neg", "enga", "achiev"), c("pos", "neg", "enga", "achiev"
)))), n = c(1310L, 427L, 123L, 66L, 179L, 93L, 333L, 125L,
974L, 282L, 226L, 74L, 1003L, 1806L, 11323L, 714L, 351L, 133L,
1750L, 200L, 385L, 108L, 787L, 171L, 104L, 145L, 99L, 154L, 952L,
772L, 95L, 49L, 55L, 89L, 301L, 142L, 96L, 225L, 264L, 375L,
848L, 1347L, 123L, 133L, 127L), SES = c(70, 78, 83, 30, 27, 39,
6, 64, 60, 60, 85, 48.6, 35, 57, 12, 66, 81, 75, 85, 36.5, 36.8,
33, 10, 97.1, 99, 77, 40, 100, 25, 21, 22, 20, 100, 100, 100,
40, 80, 100, 17, 34.3, 76.3, 58, 33, 33, 100)), .Names = c("data",
"n", "SES"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.