powered by
redist(time, status)
1
0
redist(time=c(.35,0.4,.51,.51,.7,.73),status=c(0,1,1,0,0,1))
Run the code above in your browser using DataLab