R/simplify.R

simplify <- function(paths){
	paths %>% group_by(length, p) %>% summarize(n = sum(n)) %>% select(n, length, p) %>% ungroup()
}
gertjanssenswillen/ptR documentation built on May 17, 2019, 2:11 a.m.