R/genNames.R

genNames <-
function (nloc = 2) 
{
    names <- noia::genotypesNames[1:3]
    if (nloc > 1) {
        for (i in 2:nloc) {
            names <- genNamesAppend(names)
        }
    }
    return(names)
}

Try the noia package in your browser

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

noia documentation built on March 31, 2023, 6:45 p.m.