Learn R Programming

frailtypack (version 2.4.1)

multivePenal: Fit a multivariate frailty model for two types of recurrent events and a terminal event using semiparametric penalized likelihood estimation or a parametrical estimation.

Description

Fit a multivariate frailty model for two types of recurrent events with a terminal event using a penalized likelihood estimation on the hazard function or a parametric estimation. Right-censored data is allowed. Left-truncated data and stratified analysis are not possible. Multivariate frailty models allow studying, jointly, three survival dependent processes for two types recurrent events and a terminal event, by considering the terminal event as an informative censoring. Dependencies between these three types of event are taken into account by $\alpha_1,\alpha_2,\eta,\theta$. If $\alpha_1$ and $\theta$ are both significantly different from 0, then the recurrent events of type 1 and death are significantly associated (the sign of the association is the sign of $\alpha_1$). If $\alpha_2$ and $\eta$ are both significantly different from 0, then the recurrent events of type 2 and death are significantly associated (the sign of the association is the sign of $\alpha_2$). If $rho$ is significantly different from 0, then the recurrent events of type 1 and the recurrent events of type 2 are significantly associated (the sign of the association is the sign of $rho$). The multivariate frailty model for two types of recurrent events with a terminal event is (in the calendar or time-to-event timescale): $$\left{ \begin{array}{lll} r_{i}^{(1)}(t|u_i,v_i) &= r_0^{(1)}(t)\exp({{\beta_1^{'}}}Z_{i}(t)+u_i) &\quad \mbox{(rec. of type 1)}\ r_{i}^{(2)}(t|u_i,v_i) &= r_0^{(2)}(t)\exp({{\beta_2^{'}}}Z_{i}(t)+v_i) &\quad \mbox{(rec. of type 2)}\ \lambda_i(t|u_i,v_i) &= \lambda_0(t)\exp({{\beta_3^{'}}}Z_{i}(t)+\alpha_1u_i+\alpha_2v_i) &\quad \mbox{(death)}\ \end{array} \right.$$ where $r_0^{(l)}(t)$, $l\in{1,2}$ and $\lambda_0(t)$ are respectively the recurrent and terminal event baseline hazard functions, and $\beta_1,\beta_2,\beta_3$ the regression coefficient vectors associated with $Z_{i}(t)$ the covariate vector. The covariates could be different for the different event hazard functions and may be time-dependent. We consider that death stops new occurrences of recurrent events of any type, hence given $t>D$, $dN^{R(l)*}(t), l\in{1,2}$ takes the value 0. Thus, the terminal and the two recurrent event processes are not independent or even conditional upon frailties and covariates. We consider the hazard functions of recurrent events among individuals still alive.The three components in the above multivariate frailty model are linked together by two Gaussian and correlated random effects $u_i,v_i$:\ $(u_i,v_i)^{T}\sim\mathcal{N}\left({{0}},\Sigma_{uv}\right)$, with $$\Sigma_{uv}=\left(\begin{array}{cc} \theta & \rho\sqrt{\theta\eta} \ \rho\sqrt{\theta\eta}&\eta \end{array}\right)$$

Usage

multivePenal(formula, formula.terminalEvent, formula2, data, Frailty = TRUE,
            initialize = TRUE, recurrentAG = FALSE, cross.validation = FALSE,
            n.knots, kappa, maxit = 350, hazard = "Splines", nb.int,
            print.times = T)

Arguments

formula
a formula object, with the response on the left of a $\texttildelow$ operator, and the terms on the right. The response must be a survival object as returned by the 'Surv' function like in survival package.
formula.terminalEvent
a formula object, only requires terms on the right to indicate which variables are modelling the terminal event.
formula2
a formula object, only requires terms on the right to indicate which variables are modelling the second recurrent event.
data
a 'data.frame' in which to interpret the variables named in the 'formula', 'formula.terminalEvent' and formula2.
Frailty
Logical value. Is model with frailties fitted? If so, variance of frailty parameter is estimated. The default is FALSE.
initialize
Logical value to initialize parameters. Default equals to 1.
recurrentAG
Logical value. Is Andersen-Gill model fitted? If so indicates that recurrent event times with the counting process approach of Andersen and Gill is used. This formulation can be used for dealing with time-dependent covariates. The default is FALSE.
cross.validation
Logical value. Is cross validation procedure used for estimating smoothing parameter in the penalized likelihood estimation? If so a search of the smoothing parameter using cross validation is done, with kappa1 as the seed. The cross validation is not imp
n.knots
integer vector of length 3 giving the number of knots to use. Value required in the penalized likelihood estimation. It corresponds to the (n.knots+2) splines functions for the approximation of the hazard or the survival functions. Number of knots m
kappa
vector of length 3 for positive smoothing parameter in the penalized likelihood estimation. The coefficient kappa of the integral of the squared second derivative of hazard function in the fit (penalized log likelihood). To obtain a good value for k
maxit
maximum number of iterations for the Marquardt algorithm. Default is 350
hazard
Type of hazard functions: "Splines" for semi-parametrical hazard functions with the penalized likelihood estimation, "Piecewise-per" for piecewise constant hazard function using percentile, "Piecewise-equi" for piecewise constant hazard function using equ
nb.int
An integer vector of length 3.first is the Number of intervals (between 1 and 20) for the recurrent parametrical hazard functions ("Piecewise-per", "Piecewise-equi"). Second is the Number of intervals (between 1 and 20) for the death parametrical hazard f
print.times
a logical parameter to print iteration process. Default is FALSE.

Value

  • Parameters estimates of a multive joint frailty model, more generally a 'fraityPenal' object. Methods defined for 'frailtyPenal' objects are provided for print, plot and summary. The following components are included in a 'multivePenal' object for multive Joint frailty models.
  • bsequence of the corresponding estimation of the splines coefficients, the random effects variances, the power of the frailties and the regression coefficients.
  • callThe code used for fitting the model.
  • nthe number of observations used in the fit.
  • groupsthe maximum number of groups used in the fit.
  • n.eventsthe number of recurrent events observed in the fit.
  • n.deathsthe number of deaths events observed in the fit.
  • n.events2the number of the second recurrent events observed in the fit.
  • loglikPenalthe complete marginal penalized log-likelihood in the semi-parametrical case.
  • loglikthe marginal log-likelihood in the parametrical case.
  • LCVthe approximated likelihood cross-validation criterion in the semi parametrical case (with H minus the converged hessien matrix, and l(.) the full log-likelihood.$$LCV=\frac{1}{n}(trace(H^{-1}_{pl}H) - l(.))$$
  • AICthe Akaike information Criterion for the parametrical case.$$AIC=\frac{1}{n}(np - l(.))$$
  • thetavariance of the frailty parameter $(\bold{Var}(u_i))$
  • etavariance of the frailty parameter $(\bold{Var}(v_i))$
  • alpha1the coefficient associated with the frailty parameter $u_i$ in the terminal hazard function.
  • alpha2the coefficient associated with the frailty parameter $v_i$ in the terminal hazard function.
  • rhothe correlation coefficient between $u_i$ and $v_i$
  • nparnumber of parameters.
  • coefthe regression coefficients.
  • nvarA vector with the number of covariates of each type of hazard function as components.
  • varHthe variance matrix of all parameters before positivity constraint transformation (theta, the regression coefficients and the spline coefficients). Thenafter, the delta method is needed to obtain the estimated variance parameters.
  • varHIHthe robust estimation of the variance matrix of all parameters (theta, the regression coefficients and the spline coefficients).
  • formulathe formula part of the code used for the model for the recurrent event.
  • formula.terminalEventthe formula part of the code used for the model for the terminal event.
  • formula2the formula part of the code used for the model for the second recurrent event.
  • x1vector of times for hazard functions of the recurrent events of type 1 are estimated. By default seq(0,max(time),length=99), where time is the vector of survival times.
  • lammatrix of hazard estimates and confidence bands.
  • survmatrix of baseline survival estimates and confidence bands.
  • x2vector of times for the terminal event (see x1 value).
  • x3vector of times for the recurrent event of type 2 (see x1 value).
  • lam2the same value as lam for the terminal event.
  • surv2the same value as surv for the terminal event.
  • lam3the same value as lam for the recurrent event of type 2.
  • surv3the same value as surv for the recurrent event of type 2.
  • xSu1vector of times for the survival function of the recurrent event of type 1
  • xSu2vector of times for for the survival function of the terminal event
  • xSu3vector of times for the survival function of the recurrent event of type 2
  • type.of.PiecewiseType of Piecewise hazard functions (1:"percentile", 0:"equidistant").
  • n.iternumber of iterations needed to converge.
  • type.of.hazardType of hazard functions (0:"Splines", "1:Piecewise", "2:Weibull").
  • n.knotsnumber of knots for estimating the baseline functions.
  • kappaA vector with the smoothing parameters in the penalized likelihood estimation corresponding to each baseline function as components.
  • cross.ValLogical value. Is cross validation procedure used for estimating the smoothing parameters in the penalized likelihood estimation?
  • n.knots.tempinitial value for the number of knots.
  • zisplines knots.
  • timeknots for Piecewise hazard function for the recurrent event of type 1.
  • timedcknots for Piecewise hazard function for the terminal event.
  • time2knots for Piecewise hazard function for the recurrent event of type 2.
  • noVarindicator vector for reccurrent, death and recurrent 2 explanatory variables.
  • nvarRecnumber of the recurrent of type 1 explanatory variables.
  • nvarEndnumber of death explanatory variables.
  • nvarRec2number of the recurrent of type 2 explanatory variables.
  • nbintervRNumber of intervals (between 1 and 20) for the the recurrent of type 1 parametrical hazard functions ("Piecewise-per", "Piecewise-equi").
  • nbintervDCNumber of intervals (between 1 and 20) for the death parametrical hazard functions ("Piecewise-per", "Piecewise-equi").
  • nbintervR2Number of intervals (between 1 and 20) for the the recurrent of type 2 parametrical hazard functions ("Piecewise-per", "Piecewise-equi").
  • istopVector of the convergence criteria.
  • shape.weibshape parameters for the weibull hazard function.
  • scale.weibscale parameters for the weibull hazard function.
  • martingale.resmartingale residuals for each cluster (recurrent of type 1).
  • martingaledeath.resmartingale residuals for each cluster (death).
  • martingale2.resmartingale residuals for each cluster (recurrent of type 2).
  • frailty.predempirical Bayes prediction of the first frailty term.
  • frailty2.predempirical Bayes prediction of the second frailty term.
  • frailty.varvariance of the empirical Bayes prediction of the first frailty term.
  • frailty2.varvariance of the empirical Bayes prediction of the second frailty term.
  • frailty.corrCorrelation between the empirical Bayes prediction of the two frailty.
  • linear.predlinear predictor: uses Beta'X + ui in the multivariate frailty models.
  • lineardeath.predlinear predictor for the terminal part form the multivariate frailty models: Beta'X + alpha1 ui + alpha2 vi
  • linear2.predlinear predictor: uses Beta'X + vi in the multivariate frailty models.
  • global_chisqRecurrent: a vector with the values of each multivariate Wald test.
  • dof_chisqRecurrent: a vector with the degree of freedom for each multivariate Wald test.
  • global_chisq.testRecurrent: a binary variable equals to 0 when no multivariate Wald is given, 1 otherwise.
  • p.global_chisqRecurrent: a vector with the p_values for each global multivariate Wald test.
  • names.factorRecurrent: Names of the "as.factor" variables.
  • global_chisq_dDeath: a vector with the values of each multivariate Wald test.
  • dof_chisq_dDeath: a vector with the degree of freedom for each multivariate Wald test.
  • global_chisq.test_dDeath: a binary variable equals to 0 when no multivariate Wald is given, 1 otherwise.
  • p.global_chisq_dDeath: a vector with the p_values for each global multivariate Wald test.
  • names.factordcDeath: Names of the "as.factor" variables.
  • global_chisq2Recurrent2: a vector with the values of each multivariate Wald test.
  • dof_chisq2Recurrent2: a vector with the degree of freedom for each multivariate Wald test.
  • global_chisq.test2Recurrent2: a binary variable equals to 0 when no multivariate Wald is given, 1 otherwise.
  • p.global_chisq2Recurrent2: a vector with the p_values for each global multivariate Wald test.
  • names.factor2Recurrent2: Names of the "as.factor" variables.

References

Mazroui Y, Mathoulin-Pellissier S, MacGrogan G, Brouste V, Rondeau V. Multivariate frailty models for two types of recurrent events with an informative terminal event : Application to breast cancer data. Biometrical journal. In revision, 2013.

See Also

terminal,event2, print.multivePenal,summary.multivePenal,plot.multivePenal

Examples

Run this code
data(dataMultiv)
## Calendar-time ##

MultivSpli <- multivePenal(Surv(t0,t1,deltaEvent1)~cluster(id)+var1+var2+
terminal(deltadc)+event2(deltaEvent2),formula.terminalEvent=~var1,
formula2=~var1+var2+var3,data=dataMultiv,Frailty=TRUE,recurrentAG=TRUE,
cross.validation=F,n.knots=c(4,4,4),kappa=c(1,1,1),hazard="Splines")

## print a fit
MultivSpli

## summary a fit
summary(MultivSpli)

## plot a fit
plot(MultivSpli,type.plot="haz",event="recurrent",conf.bands=TRUE)

Run the code above in your browser using DataLab