library("dovetail") source(dvt_opts()) NLINES <- length(readLines('produces-plot.Rmd'))
#' ## This block uses an external resource #' #' Some blocks will need to use an external resource like a file or a script #' #' For example, we know that there are `r NLINES` #' lines in the `produces-plot.Rmd` example file. #' #' @callout #' #' ```r nlines <- length(readLines('produces-plot.Rmd')) message(paste("there are", nlines, "lines in produces-plot.Rmd")) #' ``` #' #' @end #' #' If this works, it will be a miracle!
there were r nlines
lines in produces-plot.Rmd.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.