Problem12.2 <- data.frame(
"Carbonation" = c(
-1,
-1,
1,
1,
-1,
-1,
1,
1,
-1,
-1,
1,
1,
-1,
-1,
1,
1
),
"Pressure" = c(
-1,
-1,
-1,
-1,
1,
1,
1,
1,
-1,
-1,
-1,
-1,
1,
1,
1,
1
),
"Speed" = c(
-1,
-1,
-1,
-1,
-1,
-1,
-1,
-1,
1,
1,
1,
1,
1,
1,
1,
1
),
"FillDeviation" = c(
-3,
-1,
0,
1,
-1,
0,
2,
3,
-1,
0,
2,
1,
1,
1,
6,
5
))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.