Problem6.24 <- data.frame(
"Carbonation" = c(
10,
10,
12,
12,
10,
10,
12,
12,
10,
10,
12,
12,
10,
10,
12,
12
),
"Pressure" = c(
25,
25,
25,
25,
30,
30,
30,
30,
25,
25,
25,
25,
30,
30,
30,
30
),
"Speed" = c(
200,
200,
200,
200,
200,
200,
200,
200,
250,
250,
250,
250,
250,
250,
250,
250
),
"FillHeightDeviation" = 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.