Problem6.28 <- data.frame(
"Class" = c(
'3rd',
'3rd',
'1st',
'1st',
'3rd',
'3rd',
'1st',
'1st',
'3rd',
'3rd',
'1st',
'1st',
'3rd',
'3rd',
'1st',
'1st'
),
"Type" = c(
'BW',
'BW',
'BW',
'BW',
'Color',
'Color',
'Color',
'Color',
'BW',
'BW',
'BW',
'BW',
'Color',
'Color',
'Color',
'Color'
),
"Price" = c(
19.95,
19.95,
19.95,
19.95,
19.95,
19.95,
19.95,
19.95,
24.95,
24.95,
24.95,
24.95,
24.95,
24.95,
24.95,
24.95
),
"NumberOfOrders" = c(
50,
54,
44,
42,
46,
48,
42,
43,
49,
46,
48,
45,
47,
48,
56,
54
))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.