Problem15.2 <- data.frame(
"Load" = c(
-1,
1,
-1,
1,
-1,
1,
-1,
1,
-1,
1,
-1,
1,
-1,
1,
-1,
1
),
"Rate" = c(
-1,
-1,
1,
1,
-1,
-1,
1,
1,
-1,
-1,
1,
1,
-1,
-1,
1,
1
),
"Speed" = c(
-1,
-1,
-1,
-1,
1,
1,
1,
1,
-1,
-1,
-1,
-1,
1,
1,
1,
1
),
"Mud" = c(
-1,
-1,
-1,
-1,
-1,
-1,
-1,
-1,
1,
1,
1,
1,
1,
1,
1,
1
),
"AdvanceRate" = c(
1.68,
1.98,
4.98,
5.7,
3.24,
3.44,
9.97,
9.07,
2.07,
2.44,
7.77,
9.43,
4.09,
4.53,
11.75,
16.3
))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.