phreg(formula = formula(data), data = parent.frame(),
na.action = getOption("na.action"), dist = "weibull", init, shape = 0,
control = list(eps = 1e-08, maxiter = 20, trace = FALSE),
singular.ok = TRUE, model = FALSE, x = FALSE, y = TRUE, center = NULL)
options()$na.action
.exponential
can be obtained by choosing "weibull"
in combination with shape = 1
.eps
(convergence
criterion), maxiter
(maximum number of iterations), and
silent
(logical, controlling amount of output). You can
change any component without mention the other(s).c("phreg", "coxreg")
with componentsNULL
if not).coxreg
and coxph
, but different
from the one used by survreg
.
The model is
$$S(t; a, b, \beta, z) = S_0((t/b)^a)^{\exp((z-mean(z))\beta)}$$
where S0 is some standardized survivor function.coxreg
, check.dist
, link{aftreg}
.data(mort)
fit <- phreg(Surv(enter, exit, event) ~ ses, data = mort)
fit
plot(fit)
fit.cr <- coxreg(Surv(enter, exit, event) ~ ses, data = mort)
check.dist(fit.cr, fit)
Run the code above in your browser using DataLab