pphsm {Design} | R Documentation

## 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 class 'pphsm':
    print(x, correlation=TRUE, ...)

### Arguments

`fit` | fit object created by `psm`
`x` | result of `psm`
`correlation` | set to `FALSE` to suppress printing of correlation matrix of parameter estimates
`...` | ignored

### Value

a new fit object with transformed parameter estimates

### Author(s)

Frank Harrell
Department of Biostatistics
Vanderbilt University
f.harrell@vanderbilt.edu

### See Also

`psm`, `summary.Design`, `print.pphsm`

### Examples

    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)
    summary(f.ph)     # effects on hazard ratio scale
    options(datadist=NULL)

[Package Contents]