R/rowmode.R

In TraMineRextras: TraMineR Extension

Defines functions rowmode

Documented in rowmode

## returns the modal value of a variable
## author: Gilbert Ritschard

rowmode <- function(v, except = NULL) {
	tt <- table(v)
	tt <- tt[!(names(tt) %in% except)]
	return(names(tt)[which.max(tt)])
}

Try the TraMineRextras package in your browser