n events median 0.95LCL 0.95UCL Kelompok=Treatment 21 Kelompok=Placebo 21
9 21
23 8
16 4
NA 12
> plot(.Survfit, col=1:2, lty=1:2, mark.time=TRUE)
> legend("bottomleft", legend=c("Treatment","Placebo"), title="Kelompok", + col=1:2, lty=1:2, bty="n")
> quantile(.Survfit, quantiles=c(.25,.5,.75)) $quantile 25 50 75 Kelompok=Treatment 13 23 NA Kelompok=Placebo 4 8 12
$lower 25 50 75 Kelompok=Treatment 6 16 23 Kelompok=Placebo 2 4 8
$upper 25 50 75 Kelompok=Treatment NA NA NA Kelompok=Placebo 8 12 NA