#' A Michael Function
#'
#' This function allows you to express your love of cats.
#' @param
#' @keywords none
#' @export
#' @examples
#' michael()
michael <- function(){
message('Thanks for your diligent work to-date, Akika.')
message('Let me know if you\'d like to fill in at Wednesday night')
message('volleyball at Wellington College sometime!')
message('Michael')
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.