loocv: Leave-one-trial-out cross-validation for treatment effect...

In surrosurv: Evaluation of Failure Time Surrogate Endpoints in Individual Patient Data Meta-Analyses

Leave-one-trial-out cross-validation for treatment effect prediction

Description

The function loocv() computed leave-one-out prediction of the treatment effect on the true endpoint for each trial, based on the observed effect on the surrogate endpoint in the trial itself and based on the meta-analytic model fitted on the remaining trials (Michiels et al, 2009).

Usage

## S3 method for class 'surrosurv'
loocv(object, models, nCores, parallel = TRUE, ...)

## S3 method for class 'loocvSurrosurv'
print(x, n = min(length(x), 6), silent = FALSE, ...)
          
## S3 method for class 'loocvSurrosurv'
plot(x, models, exact.models, 
                                plot.type = c('classic', 'regression'),
                                main, ylab, xlab, ...)

Arguments

object	Either an object of class surrosurv with an attribute data of class data.frame or a data.frame with columns trialref, the trial reference trt, the treatment arm (-0.5 or 0.5) id, the patient id timeT, the value of the true endpoint T statusT, the censoring/event (0/1) indicator of the true endpoint T timeS, the value of the surrogate endpoint S statusS, the censoring/event (0/1) indicator of the surrogate endpoint S
nCores	The number of cores for parallel computing
parallel	Should results be computed using parallelization?
models, exact.models	Which models should be fitted (see surrosurv()). By default, the same models fitted in object (or x).
x	The fitted models, an object of class surrosurv
n	the number of rows to print
silent	Should the results be return for storing without printing them?
plot.type	The type ox x-scale for the loocv plot: either the trial number (classic) or the log-HR on the surrogate endpoint (regression).
main, ylab, xlab, ...	Further parameters to be passed to surrosurv (for loocv()) or to the generics print() and plot()

Value

An object of class loocvSurrosurv containing, for each trial:

margPars	the observed treatment effects on the surrogate ednpoint (alpha) and on the true endpoint (beta)
...	for each method in models the predicted value and prediction interval for beta.

Author(s)

Federico Rotolo [aut] (<https://orcid.org/0000-0003-4837-6501>), Xavier Paoletti [ctb], Marc Buyse [ctb], Tomasz Burzykowski [ctb], Stefan Michiels [ctb] (<https://orcid.org/0000-0002-6963-2968>), Dan Chaltiel [cre] (<https://orcid.org/0000-0003-3488-779X>)

References

Michiels S, Le Maitre A, Buyse M, et al. Surrogate endpoints for overall survival in locally advanced head and neck cancer: meta-analyses of individual patient data. Lancet Oncol. 2009;10(4):341-50. \Sexpr[results=rd]{tools:::Rd_expr_doi("10.1016/S1470-2045(09)70023-3")}

Examples

  ## Not run: 
  # Possibly long computation time!
  data('gastadv')
  cvRes <- loocv(gastadv)
  cvRes
  plot(cvRes)
  
## End(Not run)

surrosurv documentation built on April 14, 2023, 9:09 a.m.