rowMaxWeek <- function(trajectories){ retarr <- apply(trajectories,1,which.max) return(retarr) }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.