#' Return a colour palette function
#' @seealso \code{\link{colorRampPalette}}
#' @param n Number of colours in palette
#' @export
jet.colors<-colorRampPalette(c('navy','cyan','yellow','red'))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.