Problem5.26 <- data.frame(
"Pressure" = c(
'250',
'250',
'260',
'260',
'270',
'270',
'250',
'250',
'260',
'260',
'270',
'270',
'250',
'250',
'260',
'260',
'270',
'270'
),
"Temperature" = c(
'Low',
'Low',
'Low',
'Low',
'Low',
'Low',
'Medium',
'Medium',
'Medium',
'Medium',
'Medium',
'Medium',
'High',
'High',
'High',
'High',
'High',
'High'
),
"Yield" = c(
86.3,
86.1,
84,
85.2,
85.8,
87.3,
88.5,
89.4,
87.3,
89.9,
89,
90.3,
89.1,
91.7,
90.2,
93.2,
91.3,
93.7
))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.