R/allVec.R

allVec <-
function( ngam){

    nlabels <- maxlabel( ngam )

    all.vecs <- t( sapply( 0:nlabels, label2vec, ngam=ngam) )
    
    rownames( all.vecs ) <- 0:nlabels 
    return( all.vecs )
}

Try the IBDlabels package in your browser

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

IBDlabels documentation built on May 2, 2019, 5:54 p.m.