#' Utility function
#'
#' Utility function.
#' @param w weigths
#' @return weights sum.
#' @export
sum_weights <- function(w){
return(sum(w))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.