#'Function used to detach all the packages except basics pkgs
#'@return invisible
#'@export
detachAllPackages <- function() {
basic.packages <- c("package:stats","package:graphics","package:grDevices","package:utils","package:datasets","package:methods","package:base")
package.list <- search()[ifelse(unlist(gregexpr("package:",search()))==1,TRUE,FALSE)]
package.list <- setdiff(package.list,basic.packages)
if (length(package.list)>0) for (package in package.list) detach(package, force=TRUE,character.only=TRUE)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.