rms (version 6.8-0)

pphsm: Parametric Proportional Hazards form of AFT Models

Description

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).

Usage

pphsm(fit)
# S3 method for pphsm
print(x, digits=max(options()$digits - 4, 3),
correlation=TRUE, ...)
# S3 method for pphsm
vcov(object, ...)

Value

a new fit object with transformed parameter estimates

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

Author

Frank Harrell
Department of Biostatistics
Vanderbilt University
fh@fharrell.com

See Also

psm, summary.rms, print.pphsm

Examples

Run this code
require(survival)
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)
if (FALSE) summary(f.ph)     # effects on hazard ratio scale
options(datadist=NULL)

Run the code above in your browser using DataLab