simplify <- function(paths){ paths %>% group_by(length, p) %>% summarize(n = sum(n)) %>% select(n, length, p) %>% ungroup() }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.