Problem11.14 <- data.frame(
"X1" = c(
-1,
1,
-1,
1,
-1.4142135623731,
1.4142135623731,
0,
0,
0,
0,
0,
0
),
"X2" = c(
-1,
-1,
1,
1,
0,
0,
-1.4142135623731,
1.4142135623731,
0,
0,
0,
0
),
"MeanThick" = c(
360.6,
445.2,
412.1,
601.7,
411.4,
518,
397.6,
497.6,
530.6,
495.4,
487.3,
510.2
),
"VarThick" = c(
6.689,
14.23,
7.088,
8.586,
6.644,
13.13,
11.74,
7.649,
7.836,
9.306,
9.127,
7.956
))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.