knitr::opts_chunk$set( collapse = TRUE, comment = "#>" )
system.file('extdata', 'cod_model.tgz', package = 'Rgadget') %>% untar(exdir = path.expand('~/gadget_example/'))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.