R/f_convenience_covML.R

In psychonetrics: Structural Equation Modeling and Confirmatory Network Analysis

Defines functions covUBtoML covMLtoUB covML

Documented in covML covMLtoUB covUBtoML

# Maximum likelihood covariance estimate:
covML <- function(x,...){
  (nrow(x)-1)/(nrow(x)) * stats::cov(x, ...)
}

# transform between ML and unbiased estimators:
covMLtoUB <- function(x,n,...){
  n/(n-1) * x
}

covUBtoML <- function(x,n,...){
  (n-1)/n * x
}

Try the psychonetrics package in your browser