load.f <- function (file, ...) { ls.ext <- function(file) { local({ base::load(file) base::ls() }) } base::load(file, .GlobalEnv, ...) ls.ext(file) }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.