Problem5.29 <- data.frame(
"Frequency" = c(
'0.1',
'0.1',
'0.1',
'0.1',
'1',
'1',
'1',
'1',
'10',
'10',
'10',
'10',
'0.1',
'0.1',
'0.1',
'0.1',
'1',
'1',
'1',
'1',
'10',
'10',
'10',
'10',
'0.1',
'0.1',
'0.1',
'0.1',
'1',
'1',
'1',
'1',
'10',
'10',
'10',
'10'
),
"Environment" = c(
'Air',
'Air',
'Air',
'Air',
'Air',
'Air',
'Air',
'Air',
'Air',
'Air',
'Air',
'Air',
'H20',
'H20',
'H20',
'H20',
'H20',
'H20',
'H20',
'H20',
'H20',
'H20',
'H20',
'H20',
'Salt H20',
'Salt H20',
'Salt H20',
'Salt H20',
'Salt H20',
'Salt H20',
'Salt H20',
'Salt H20',
'Salt H20',
'Salt H20',
'Salt H20',
'Salt H20'
),
"CrackGrowth" = c(
2.08,
2.81,
2.71,
2.24,
2.38,
2.06,
2.68,
2.65,
2.12,
2.48,
2.47,
2.29,
11.3,
9.06,
11,
11,
3.64,
3.96,
3.18,
3.2,
2.03,
2.23,
2.05,
2.06,
10.4,
9.36,
10.01,
9.96,
3.24,
3.98,
3.24,
3.1,
2.06,
1.75,
1.93,
1.9
))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.