weight_to <- function(vector,names) { if (!is.vector(vector)) stop("Input must be vector") names(vector) <- names return(vector) }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.