.warning <- function(...,w=NULL) { warning(...,call.=FALSE) tmp <- list(NULL) names(tmp) <- paste(...,sep="") return(c(w,tmp)) }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.