#' @title Mean of list function
#'
#' @param list_of_vects an object of \code{list} class containing \code{vector} objects
#' @export
#' @details Here explain what function is doing and why.
#' @return \code{list} of means in each vector in arument list
#' @seealso \code{\link[base]{mean}}
#' @examples
#' mean_list(list(c(2,4), c(10,15)))
#' mean_list(list(c(20,16), c(1,3)))
mean_list <- function(list_of_vects) {
lapply(list_of_vects, mean)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.