R/vcov.svystat.rob.R

vcov.svystat.rob <-
function(object, ...){
v <- as.matrix(attr(object, "var"))
rownames(v) <- names(object)
colnames(v) <- "Variance"
return(v)
}
martinSter/rhte documentation built on May 13, 2019, 11:34 a.m.