.onLoad <- function(...){
cl <- parallel:::makeCluster(8)
doParallel:::registerDoParallel(cl)
options(java.parameters = "-Xmx4000m")
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.