Parametric Proportional Hazards form of AFT Models
Translates an accelerated failure time (AFT) model fitted by
psm
to proportional hazards form, if the fitted model was
a Weibull or exponential model (extreme value distribution with
"log" link).
pphsm(fit) ## S3 method for class 'pphsm' print(x, digits=max(options()$digits - 4, 3), correlation=TRUE, ...) ## S3 method for class 'pphsm' vcov(object, ...)
fit |
fit object created by |
x |
result of |
digits |
how many significant digits are to be used for the returned value |
correlation |
set to |
... |
ignored |
object |
a pphsm object |
a new fit object with transformed parameter estimates
Frank Harrell
Department of Biostatistics
Vanderbilt University
fh@fharrell.com
set.seed(1) S <- Surv(runif(100)) x <- runif(100) dd <- datadist(x); options(datadist='dd') f <- psm(S ~ x, dist="exponential") summary(f) # effects on log(T) scale f.ph <- pphsm(f) ## Not run: summary(f.ph) # effects on hazard ratio scale options(datadist=NULL)
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.