R/seqedist.R

Defines functions seqeage seqedist

seqedist <- function(eseq, idcost, vparam, interval=TRUE, norm=TRUE){
    norm <- as.integer(norm)
    interval <- as.integer(interval)
    return(.Call(C_tmrseqedist, eseq, idcost, vparam, norm, interval));
}

seqeage <- function(eseq, event.list) {
	return(.Call(C_tmreventinseq, eseq, as.integer(event.list)))
}

Try the TraMineR package in your browser

Any scripts or data that you put into this service are public.

TraMineR documentation built on May 29, 2024, 5 a.m.