R/vcov.mleDb.R

In dbd: Discretised Beta Distribution

Defines functions vcov.mleDb

Documented in vcov.mleDb

vcov.mleDb <- function(object,...){
    v <- attr(object,"covMat")
    if(is.null(v)) v <- NA
    v
}

Try the dbd package in your browser