# transition matrix for illness-death model
trans <- transMat(list(c(2,3),c(4), c(), c()),
names = c("Alive", "Relapse","Non-relapse mortality", "Death after relapse"))
split.transitions <- c(2,3)
modify_transMat(trans, split.transitions)
Run the code above in your browser using DataLab