Extract variance-covariance matrix from hazard model

Returns the estimated variance-covariance matrix of the fitted coefficients.

Usage

# S3 method for class 'hazard'
vcov(object, ...)

Arguments

object

A hazard object.

...

Unused; for S3 compatibility.

Examples

fit <- hazard(time = rexp(30, 0.5), status = rep(1L, 30),
              theta = c(0.3, 1.0), dist = "weibull", fit = TRUE)
vcov(fit)
#>              [,1]         [,2]
#> [1,]  0.011378546 -0.003804749
#> [2,] -0.003804749  0.015656453