20 lines
No EOL
591 B
R
20 lines
No EOL
591 B
R
# Covariance matrix using the component matrix M and V from QEE
|
|
#
|
|
# Author: Francois Pelletier
|
|
#
|
|
# LGPL-3.0
|
|
###############################################################################
|
|
|
|
#' Covariance matrix using the component matrix M and V from QEE
|
|
#'
|
|
#' Covariance matrix using the component matrix M and V from QEE
|
|
#' @param M Gradient matrix
|
|
#' @param V Covariance matrix of equations
|
|
#' @param n Sample size
|
|
#' @return Weighted covariance matrix
|
|
#' @export covariance.QEE
|
|
#' @author François Pelletier
|
|
covariance.QEE <- function(M,V,n) ## Omega
|
|
{
|
|
ginv(M %*% ginv(V) %*% t(M))/n
|
|
} |