Problem3.34 <- data.frame(
"Chemical" = c(
1,
1,
1,
2,
2,
2,
2,
2,
3,
3,
3,
3,
3,
4,
4,
4,
4,
4
),
"Brightness" = c(
92.746,
76.208,
82.876,
80.522,
79.306,
81.914,
80.346,
73.385,
79.417,
78.017,
91.596,
80.802,
80.626,
78.001,
78.358,
77.544,
77.364,
77.386
))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.