# NOT RUN {
data(ctcData)
# sample data to reduce computation time of example
smp <- ctcData$id %in% sample(1:1000, 150, FALSE)
ctcData <- ctcData[smp,]
# analysis with both time-dependent and time-independent components
res <- ctCoxMSM(data = ctcData, base = "x", td = "xt")
print(x = res)
# analysis with both time-dependent and time-independent components
res <- ctSFTM(data = ctcData, base = "x", td = "xt")
print(x = res)
# }
Run the code above in your browser using DataLab