data("bladder5state")
b4state<-multidf(gap1=bladder5state$y1, event1=bladder4state$d1,
gap2=bladder5state$y2, event2=bladder4state$d2,
gap3=bladder5state$y3, status=bladder4state$d3)
head(b4state)[[1]]
LIN3df(b4state, x=13, y=20, z=40)
b4<-multidf(gap1=bladder4$t1, event1=bladder4$d1,
gap2=bladder4$t2-bladder4$t1, event2=bladder4$d2,
gap3=bladder4$t3-bladder4$t2, status=bladder4state$d3)
LIN3df(b4, x=13, y=20, z=40)
Run the code above in your browser using DataLab