Nothing
#' @method print anomalies
print.anomalies <- function(x,...){
print(as.vector(x))
cat(paste0("\n*** Anomaly object containing ", length(x), " anomalies provided with their value for id variable '",attributes(x)$meta$crazymeta$id,"'.\n"))
cat("Use as a vector. Available methods: fortify, plot")
}
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.