R/countpattern2.R

# aus e1071
countpattern2<-function (x)
{
    intpatt<-apply(as.matrix(x),1,bin2int)
    intpatt<-intpatt+1
    pat<-tabulate(intpatt,nbins=2^ncol(as.matrix(x)))
    pat
}

Try the prefmod package in your browser

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

prefmod documentation built on May 2, 2019, 4:59 p.m.