Nothing
#' Printing isatpanel results
#'
#' @param x An isatpanel object.
#' @param ... Further arguments passed to print
#'
#' @return Print output of the 'isatpanel.result' list element of the 'isatpanel' object.
#' @export
#'
#'
print.isatpanel <- function(x, ...){
gets::print.isat(x$isatpanel.result)
}
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.