R/m_effective.R
In snembrini/poolVIM: Gene-Based Association Tests using the Actual Impurity Reduction (AIR) Variable Importance. <doi:10.1093/Bioinformatics/Bty373>
#' meff.
#' @param R R
#'
m_effective <- function(R) {
evs <- eigen(R)$values
abs.evs <- abs(evs)
k <- length(evs)
m <- 1 + (k - 1) * (1 - var(evs) / k)
m <- floor(m)
return(m)
}
snembrini/poolVIM documentation built on May 4, 2019, 3:10 a.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
#' meff.
#' @param R R
#'
m_effective <- function(R) {
evs <- eigen(R)$values
abs.evs <- abs(evs)
k <- length(evs)
m <- 1 + (k - 1) * (1 - var(evs) / k)
m <- floor(m)
return(m)
}
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.