#' @export
combine_cpts <- function(..., operator = "+") {
cpt_list <- list(...)
labels <- names(cpt_list)
result <- list(cpt_list = cpt_list, operator = operator, labels = labels)
class(result) <- "cpt_combination"
result
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.