Table11.6 <- data.frame(
'Time'=c(80, 80, 90, 90, 85, 85, 85, 85, 85, 92.07, 77.93, 85, 85),
'Temperature'=c(170,180,170,180,175,175,175,175,175,175,175,182.07,167.93),
'Yield'=c(76.5,77.0,78.0,79.5,79.9,80.3,80.0,79.7,79.8,78.4,75.6,78.5,77.0),
'Viscosity'=c(62,60,66,59,72,69,68,70,71,68,71,58,57),
'MolecularWeight'=c(2940,3470,3680,3890,3480,3200,3410,3290,3500,3360,3020,3630,3150)
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.