Problem6.52 <- data.frame(
"Run" = c(
1,
2,
3,
4,
5,
6,
7,
8,
9,
10,
11,
12
),
"Temp" = c(
120,
158,
121,
160,
118,
163,
122,
165,
140,
140,
140,
140
),
"Pressure" = c(
41,
40,
82,
80,
39,
40,
80,
83,
60,
60,
60,
60
),
"Conc" = c(
14,
15,
15,
15,
33,
30,
30,
30,
22.5,
22.5,
22.5,
22.5
),
"X1" = c(
-0.75,
0.9,
-0.95,
1,
-1.1,
1.15,
-0.9,
1.25,
0,
0,
0,
0
),
"X2" = c(
-0.95,
-1,
1.1,
1,
-1.05,
-1,
1,
1.15,
0,
0,
0,
0
),
"X3" = c(
-1.133,
-1,
-1,
-1,
1.14,
1,
1,
1,
0,
0,
0,
0
),
"Yield" = c(
32,
46,
57,
65,
36,
48,
57,
68,
50,
44,
53,
56
))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.