Problem4.34 <- data.frame(
"Batch" = c(
1,
2,
3,
4,
5,
1,
2,
3,
4,
5,
1,
2,
3,
4,
5,
1,
2,
3,
4,
5,
1,
2,
3,
4,
5
),
"Day" = c(
1,
1,
1,
1,
1,
2,
2,
2,
2,
2,
3,
3,
3,
3,
3,
4,
4,
4,
4,
4,
5,
5,
5,
5,
5
),
"Catalyst" = c(
'A',
'C',
'B',
'D',
'E',
'B',
'E',
'A',
'C',
'D',
'D',
'A',
'C',
'E',
'B',
'C',
'D',
'E',
'B',
'A',
'E',
'B',
'D',
'A',
'C'
),
"Time" = c(
8,
11,
4,
6,
4,
7,
2,
9,
8,
2,
1,
7,
10,
6,
3,
7,
3,
3.58,
6,
8,
3,
8,
5,
10,
8
))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.