Nothing
#' @keywords internal
last <- function(x) { tail(x, n = 1) }
#' @keywords internal
h <- function(w) if( any( grepl( "Recycling array of length 1 in vector-array arithmetic is deprecated", w) ) ) invokeRestart( "muffleWarning" )
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.