survcat {Surrogate}R Documentation

Compute surrogacy measures for a categorical (ordinal) surrogate and a time-to-event true endpoint in the meta-analytic multiple-trial setting.

Description

The function 'survcat()' fits the model for a categorical (ordinal) surrogate and time-to-event true endpoint developed by Burzykowski et al. (2004) in the meta-analytic multiple-trial setting.

Usage

survcat(data, true, trueind, surrog, trt, center, trial, patientid)

Arguments

data

A data frame with the correct columns (See details).

true

Observed time-to-event (true endpoint).

trueind

Time-to-event indicator.

surrog

Ordinal surrogate endpoint.

trt

Treatment indicator.

center

Center indicator (equal to trial if there are no different centers).

trial

Trial indicator.

patientid

Patient indicator.

Value

Returns an object of class "survcat" that can be used to evaluate surrogacy and contains the following elements:

Model

In the model developed by Burzykowski et al. (2004), a copula-based model is used for the true endpoint and a latent continuous variable, underlying the surrogate endpoint. More specifically, the Plackett copula is used. The marginal model for the surrogate endpoint is a proportional odds model. For the true endpoint, the proportional hazards model is used. The quality of the surrogate at the individual level can be evaluated by using the copula parameter Theta, which takes the form of a global odds ratio. The quality of the surrogate at the trial level can be evaluated by considering the correlation coefficient between the estimated treatment effects, while adjusting for the estimation error.

Data Format

The data frame must contains the following columns:

Author(s)

Dries De Witte

References

Burzykowski, T., Molenberghs, G., & Buyse, M. (2004). The validation of surrogate end points by using data from randomized clinical trials: a case-study in advanced colorectal cancer. Journal of the Royal Statistical Society Series A: Statistics in Society, 167(1), 103-124.

Examples

## Not run: 
data("colorectal4")
fit <- survcat(data = colorectal4, true = truend, trueind = trueind, surrog = surrogend,
               trt = treatn, center = center, trial = trialend, patientid = patid)
print(fit)
summary(fit)
plot(fit)

## End(Not run)

[Package Surrogate version 3.2.5 Index]