pphsm
From rms v5.1-3.1
by Frank E Harrell Jr
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).
- Keywords
- models, regression, survival
Usage
pphsm(fit)
# S3 method for pphsm
print(x, digits=max(options()$digits - 4, 3),
correlation=TRUE, …)
# S3 method for pphsm
vcov(object, …)
Arguments
- fit
fit object created by
psm
- x
result of
psm
- digits
how many significant digits are to be used for the returned value
- correlation
set to
FALSE
to suppress printing of correlation matrix of parameter estimates- …
ignored
- object
a pphsm object
Value
a new fit object with transformed parameter estimates
See Also
Examples
# NOT RUN {
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
# }
# NOT RUN {
options(datadist=NULL)
# }
Community examples
Looks like there are no examples yet.