R/vcov.repolr.R

Defines functions vcov.repolr

Documented in vcov.repolr

vcov.repolr <-
function(object, robust.var = TRUE, ...){
 if(robust.var == FALSE){
   vcov.mat <- object$naive.var
  } else {
   vcov.mat <- object$robust.var
  }
  vcov.mat
}

Try the repolr package in your browser

Any scripts or data that you put into this service are public.

repolr documentation built on May 1, 2019, 9:20 p.m.