Problem5.21 <- data.frame(
"Pressure" = c(
'120',
'130',
'140',
'150',
'120',
'130',
'140',
'150',
'120',
'130',
'140',
'150'
),
"Temperature" = c(
'250',
'250',
'250',
'250',
'260',
'260',
'260',
'260',
'270',
'270',
'270',
'270'
),
"Strength" = c(
9.6,
9.69,
8.43,
9.98,
11.28,
10.1,
11.01,
10.44,
9,
9.57,
9.03,
9.8
))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.