search for: pcifu

...I tried to plot the cumulative failure rate (i.e. 1 - survival probability). I have used the following code to plot. The scenario is that patients are randomized to different treatment arm (rev in the code), the PCI revascularization was monitored over 5 years. #R code testfit <- survfit(Surv(pcifu,pci)~rev,data=subproc) testfit$surv <- 1 - testfit$surv testfail <- plot(testfit, mark.time=FALSE,col=1:2, main='Failure Rate') #End of R code I arbitarily replaced testfit$surv by computing 1 minus the original survival rate. So far so good. However, when I plot the manipulated &q...