checkBinaryTrait: checkBinaryTrait
In tienmt/coher: coheritability estimation

Description Usage Arguments Value Author(s) Examples

View source: R/coher.R

checkBinaryTrait

1	checkBinaryTrait(y)

y

phenotype

binary or continuous

The Tien Mai

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (y)
{
    if (!is.numeric(y))
        stop("Only numeric phenotypes are accepted.")
    if (length(levels(factor(y))) < 3)
        print("binomial")
    else print("continuous")
  }