Nothing
####################################################################################################################################
################################## exit ############################################################################################
# >>
exit <- function() {
opt = options(show.error.messages = FALSE)
on.exit(options(opt))
stop()
}
# <<
################################## exit ############################################################################################
####################################################################################################################################
####################################################################################################################################
################################## exit (old) ######################################################################################
# >>
# exit <- function() {
# .Internal(.invokeRestart(list(NULL, NULL), NULL))
# }
# <<
################################## exit (old) ######################################################################################
####################################################################################################################################
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.