library(survivalREC)
data("bladder4state")
b3state<-multidf(gap1=bladder4state$y1, event1=bladder4state$d1,
gap2=bladder4state$y2, status=bladder4state$d2,
size=bladder4state$size)
head(b3state[[1]])
class(b3state)
b4state<-multidf(gap1=bladder4state$y1, event1=bladder4state$d1,
gap2=bladder4state$y2, event2=bladder4state$d2,
gap3=bladder4state$y3, status=bladder4state$d3,
size=bladder4state$size)
head(b4state[[1]])
Run the code above in your browser using DataLab