R/norm.label.R

Defines functions `norm.label`

`norm.label` <-
function(cl){
    old.label <- names(table(cl))
    apply(matrix(cl), 1, function(x) which(old.label==as.character(x)))
    }

Try the mcclust package in your browser

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

mcclust documentation built on May 2, 2022, 5:05 p.m.