b3state<-multidf(gap1=bladder4state$y1, event1=bladder4state$d1,
gap2=bladder4state$y2, status=bladder4state$d2,
size=bladder4state$size)
LINdf(b3,x=13,y=20)
Run the code above in your browser using DataLab