pphsm | R Documentation |
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
psm
, summary.rms
, print.pphsm
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)
## Not run: summary(f.ph) # effects on hazard ratio scale
options(datadist=NULL)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.