R/vcov.R

In aods3: Analysis of Overdispersed Data using S3 Methods

Defines functions vcov.aodql vcov.aodml

Documented in vcov.aodml vcov.aodql

vcov.aodml <- function(object, ...) {
  
	b <- coef(object)
	nbb <- length(b)
	v <- as.matrix(object$varparam[seq(nbb), seq(nbb)])
	nam <- names(b)
	dimnames(v) <- list(nam, nam)
	v

}

vcov.aodql <- function(object, ...) vcov(object$fm, ...)

Try the aods3 package in your browser