#' Una funcion que calcula un promedio unal
#'
#' @param vectorunal Un vector numerico
#' @return El promedio unal calculado
#' @export
Media_U <- function(vectorunal){
vectorunal <- mean(vectorunal)*2
return(vectorunal)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.