## ----setup, include=FALSE------------------------------------------------
library(knitr)
# to base64 encode images
opts_knit$set(upload.fun = image_uri)
## ----cars-demo-----------------------------------------------------------
summary(cars)
fit=lm(dist~speed, data=cars)
summary(fit)
## ----cars-plot, fig.width=7, fig.height=6, fig.align='center'------------
par(mar=c(4,4,.1,.1))
plot(cars, pch=19)
## ----setup, eval=FALSE---------------------------------------------------
# library(knitr)
# # to base64 encode images
# opts_knit$set(upload.fun = image_uri)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.