Problem4.12 <- data.frame(
"Tip" = c(
'1',
'1',
'1',
'1',
'2',
'2',
'2',
'2',
'3',
'3',
'3',
'3',
'4',
'4',
'4',
'4'
),
"Coupon" = c(
1,
2,
3,
4,
1,
2,
3,
4,
1,
2,
3,
4,
1,
2,
3,
4
),
"Hardness" = c(
9.3,
9.4,
9.6,
10,
9.4,
9.3,
9.8,
9.9,
9.2,
9.4,
9.5,
9.7,
9.7,
9.6,
10,
10.2
))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.