Nothing
#' @export
format.interprocess <- function (x, ...) x$name
#' @export
as.character.interprocess <- function (x, ...) x$name
#' @export
print.interprocess <- function (x, ...)
cat(file = stdout(), '<', class(x)[[1]], '> "', x$name, '"\n', sep = '')
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.