#' @title An introductory plot
#'
#' @param x A quantitative vector
#'
#' @return A plot
#' @export
#'
#' @examples
#' \dontrun{d <- 1:40; myplot(x=d)}
myplot=function(x){
y <- 0.86089580 + 1.46959217*x - 0.02745726*x^2
plot(y~x, col="Blue", lwd=2, type="l", main = "Small plot")
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.