map_mean <- function(.x, .f, ...) { (map(.x, .f, ...) %>% reduce(`+`)) / length(.x) }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.