storeplot <- function(displaylist){
if(is.null(displaylist) || identical(displaylist, list(NULL))){
return("");
}
#displaylist[2] <- NULL;
return(storeobject(displaylist));
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.