R/eigenvalue.R

Defines functions eigenvalue

Documented in eigenvalue

eigenvalue <- function(X) {
    d <- svd(X, nu=0, nv=0)$d[1]
    d <- d / sqrt(nrow(X))
    return(d)
}
GonzalezIgnacio/HandlingMissRows documentation built on Jan. 17, 2020, 6:29 p.m.