#' @export
plotSeq3Dims <- function(tforms){
invisible(lapply(tforms, function(x){
if (!is.null(x$overlay)){
display(x$overlay)
}
}))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.