Problem2.29 <- data.frame(
"FlowRate" = c(
125,
125,
125,
125,
125,
125,
200,
200,
200,
200,
200,
200
),
"Uniformity" = c(
2.7,
4.6,
2.6,
3,
3.2,
3.8,
4.6,
3.4,
2.9,
3.5,
4.1,
5.1
))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.