meanAlong <- function(x, along) { dx = dim(x) dim_along = dx[along] sumAlong(x, along) / dim_along }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.