## dat$trt
## group1 group2 group3
## 17 44 67
all time
Survival by STS (yes, no)
## Call: survfit(formula = Surv(time2death, death) ~ trt, data = dat)
##
## n events median 0.95LCL 0.95UCL
## trt=group1 17 6 2.256 1.864 NA
## trt=group2 44 27 0.723 0.356 NA
## trt=group3 67 49 0.742 0.490 2.19

## Call: survfit(formula = Surv(time2death, death) ~ trt, data = dat)
##
## trt=group1
## time n.risk n.event survival std.err lower 95% CI upper 95% CI
## 0.0 17 0 1.000 0.0000 1.0000 1
## 0.5 12 2 0.857 0.0935 0.6921 1
## 1.0 9 1 0.786 0.1097 0.5977 1
## 2.0 4 1 0.655 0.1505 0.4173 1
## 3.0 2 1 0.491 0.1812 0.2383 1
## 4.0 1 1 0.246 0.1958 0.0514 1
##
## trt=group2
## time n.risk n.event survival std.err lower 95% CI upper 95% CI
## 0.0 44 0 1.000 0.0000 1.0000 1.000
## 0.5 23 15 0.632 0.0759 0.4999 0.800
## 1.0 12 7 0.432 0.0821 0.2972 0.626
## 2.0 4 3 0.320 0.0826 0.1927 0.530
## 3.0 2 1 0.213 0.1029 0.0827 0.549
## 4.0 1 0 0.213 0.1029 0.0827 0.549
##
## trt=group3
## time n.risk n.event survival std.err lower 95% CI upper 95% CI
## 0.0 67 0 1.000 0.0000 1.000 1.000
## 0.5 35 27 0.578 0.0621 0.469 0.714
## 1.0 29 6 0.479 0.0633 0.370 0.621
## 2.0 21 6 0.379 0.0620 0.275 0.522
## 3.0 13 3 0.322 0.0607 0.223 0.466
## 4.0 10 2 0.269 0.0613 0.172 0.420
## 5.0 9 0 0.269 0.0613 0.172 0.420
## Call:
## coxph(formula = Surv(time2death, death) ~ trt, data = dat)
##
## n= 128, number of events= 82
##
## coef exp(coef) se(coef) z Pr(>|z|)
## trtgroup2 0.9138 2.4937 0.4526 2.019 0.0435 *
## trtgroup3 0.7474 2.1116 0.4370 1.711 0.0872 .
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## exp(coef) exp(-coef) lower .95 upper .95
## trtgroup2 2.494 0.4010 1.0270 6.055
## trtgroup3 2.112 0.4736 0.8967 4.972
##
## Concordance= 0.548 (se = 0.033 )
## Rsquare= 0.038 (max possible= 0.994 )
## Likelihood ratio test= 4.97 on 2 df, p=0.08334
## Wald test = 4.08 on 2 df, p=0.1303
## Score (logrank) test = 4.29 on 2 df, p=0.1169
Death or Hospitalization by STS (yes, no)
## Call: survfit(formula = Surv(time2death, death.or.hosp) ~ trt, data = dat)
##
## n events median 0.95LCL 0.95UCL
## trt=group1 17 7 2.256 1.292 NA
## trt=group2 44 32 0.723 0.356 1.16
## trt=group3 67 59 0.742 0.400 1.88

## Call: survfit(formula = Surv(time2death, death.or.hosp) ~ trt, data = dat)
##
## trt=group1
## time n.risk n.event survival std.err lower 95% CI upper 95% CI
## 0.0 17 0 1.000 0.0000 1.000 1.000
## 0.5 12 2 0.857 0.0935 0.692 1.000
## 1.0 9 1 0.786 0.1097 0.598 1.000
## 2.0 4 2 0.573 0.1523 0.340 0.965
## 3.0 2 1 0.430 0.1686 0.199 0.927
## 4.0 1 1 0.215 0.1737 0.044 1.000
##
## trt=group2
## time n.risk n.event survival std.err lower 95% CI upper 95% CI
## 0.0 44 0 1.0000 0.0000 1.0000 1.000
## 0.5 23 16 0.6061 0.0772 0.4722 0.778
## 1.0 12 8 0.3840 0.0801 0.2552 0.578
## 2.0 4 5 0.2032 0.0736 0.0999 0.413
## 3.0 2 1 0.1354 0.0739 0.0465 0.395
## 4.0 1 1 0.0677 0.0605 0.0118 0.390
##
## trt=group3
## time n.risk n.event survival std.err lower 95% CI upper 95% CI
## 0.0 67 0 1.000 0.0000 1.0000 1.000
## 0.5 35 28 0.565 0.0620 0.4559 0.701
## 1.0 29 6 0.468 0.0628 0.3602 0.609
## 2.0 21 7 0.355 0.0605 0.2538 0.495
## 3.0 13 8 0.220 0.0531 0.1367 0.353
## 4.0 10 3 0.169 0.0482 0.0965 0.295
## 5.0 9 1 0.152 0.0462 0.0837 0.276
## Call:
## coxph(formula = Surv(time2death, death.or.hosp) ~ trt, data = dat)
##
## n= 128, number of events= 98
##
## coef exp(coef) se(coef) z Pr(>|z|)
## trtgroup2 0.9756 2.6529 0.4187 2.33 0.0198 *
## trtgroup3 0.7037 2.0213 0.4044 1.74 0.0818 .
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## exp(coef) exp(-coef) lower .95 upper .95
## trtgroup2 2.653 0.3770 1.1677 6.027
## trtgroup3 2.021 0.4947 0.9149 4.465
##
## Concordance= 0.554 (se = 0.031 )
## Rsquare= 0.05 (max possible= 0.997 )
## Likelihood ratio test= 6.54 on 2 df, p=0.03795
## Wald test = 5.6 on 2 df, p=0.06095
## Score (logrank) test = 5.88 on 2 df, p=0.05294
Two year survival
Survival by STS (yes, no)
## Call: survfit(formula = Surv(fu2y, death2y) ~ trt, data = dat)
##
## n events median 0.95LCL 0.95UCL
## trt=group1 17 4 NA 1.864 NA
## trt=group2 44 25 0.723 0.356 NA
## trt=group3 67 39 0.742 0.490 NA

## Call: survfit(formula = Surv(fu2y, death2y) ~ trt, data = dat)
##
## trt=group1
## time n.risk n.event survival std.err lower 95% CI upper 95% CI
## 0.0 17 0 1.000 0.0000 1.000 1
## 0.5 12 2 0.857 0.0935 0.692 1
## 1.0 9 1 0.786 0.1097 0.598 1
## 2.0 4 1 0.655 0.1505 0.417 1
##
## trt=group2
## time n.risk n.event survival std.err lower 95% CI upper 95% CI
## 0.0 44 0 1.000 0.0000 1.000 1.000
## 0.5 23 15 0.632 0.0759 0.500 0.800
## 1.0 12 7 0.432 0.0821 0.297 0.626
## 2.0 4 3 0.320 0.0826 0.193 0.530
##
## trt=group3
## time n.risk n.event survival std.err lower 95% CI upper 95% CI
## 0.0 67 0 1.000 0.0000 1.000 1.000
## 0.5 35 27 0.578 0.0621 0.469 0.714
## 1.0 29 6 0.479 0.0633 0.370 0.621
## 2.0 21 6 0.379 0.0620 0.275 0.522
## Call:
## coxph(formula = Surv(fu2y, death2y) ~ trt, data = dat)
##
## n= 128, number of events= 68
##
## coef exp(coef) se(coef) z Pr(>|z|)
## trtgroup2 1.2073 3.3445 0.5394 2.238 0.0252 *
## trtgroup3 1.1405 3.1282 0.5252 2.171 0.0299 *
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## exp(coef) exp(-coef) lower .95 upper .95
## trtgroup2 3.345 0.2990 1.162 9.627
## trtgroup3 3.128 0.3197 1.117 8.757
##
## Concordance= 0.551 (se = 0.034 )
## Rsquare= 0.056 (max possible= 0.99 )
## Likelihood ratio test= 7.34 on 2 df, p=0.02545
## Wald test = 5.18 on 2 df, p=0.07485
## Score (logrank) test = 5.79 on 2 df, p=0.0552
Death or Hospitalization by STS (yes, no)
## Call: survfit(formula = Surv(fu2y, death.or.hosp.2y) ~ trt, data = dat)
##
## n events median 0.95LCL 0.95UCL
## trt=group1 17 5 NA 1.292 NA
## trt=group2 44 29 0.723 0.356 1.16
## trt=group3 67 41 0.742 0.400 1.88

## Call: survfit(formula = Surv(fu2y, death.or.hosp.2y) ~ trt, data = dat)
##
## trt=group1
## time n.risk n.event survival std.err lower 95% CI upper 95% CI
## 0.0 17 0 1.000 0.0000 1.000 1.000
## 0.5 12 2 0.857 0.0935 0.692 1.000
## 1.0 9 1 0.786 0.1097 0.598 1.000
## 2.0 4 2 0.573 0.1523 0.340 0.965
##
## trt=group2
## time n.risk n.event survival std.err lower 95% CI upper 95% CI
## 0.0 44 0 1.000 0.0000 1.0000 1.000
## 0.5 23 16 0.606 0.0772 0.4722 0.778
## 1.0 12 8 0.384 0.0801 0.2552 0.578
## 2.0 4 5 0.203 0.0736 0.0999 0.413
##
## trt=group3
## time n.risk n.event survival std.err lower 95% CI upper 95% CI
## 0.0 67 0 1.000 0.0000 1.000 1.000
## 0.5 35 28 0.565 0.0620 0.456 0.701
## 1.0 29 6 0.468 0.0628 0.360 0.609
## 2.0 21 7 0.355 0.0605 0.254 0.495
## Call:
## coxph(formula = Surv(fu2y, death.or.hosp.2y) ~ trt, data = dat)
##
## n= 128, number of events= 75
##
## coef exp(coef) se(coef) z Pr(>|z|)
## trtgroup2 1.1670 3.2122 0.4854 2.404 0.0162 *
## trtgroup3 0.9581 2.6068 0.4739 2.022 0.0432 *
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## exp(coef) exp(-coef) lower .95 upper .95
## trtgroup2 3.212 0.3113 1.241 8.317
## trtgroup3 2.607 0.3836 1.030 6.599
##
## Concordance= 0.556 (se = 0.033 )
## Rsquare= 0.057 (max possible= 0.994 )
## Likelihood ratio test= 7.54 on 2 df, p=0.02303
## Wald test = 5.8 on 2 df, p=0.05507
## Score (logrank) test = 6.31 on 2 df, p=0.04273
One year survival
Survival by STS (yes, no)
## Call: survfit(formula = Surv(fu1y, death1y) ~ trt, data = dat)
##
## n events median 0.95LCL 0.95UCL
## trt=group1 17 3 NA NA NA
## trt=group2 44 22 0.723 0.356 NA
## trt=group3 67 33 0.742 0.490 NA

## Call: survfit(formula = Surv(fu1y, death1y) ~ trt, data = dat)
##
## trt=group1
## time n.risk n.event survival std.err lower 95% CI upper 95% CI
## 0.0 17 0 1.000 0.0000 1.000 1
## 0.5 12 2 0.857 0.0935 0.692 1
## 1.0 9 1 0.786 0.1097 0.598 1
##
## trt=group2
## time n.risk n.event survival std.err lower 95% CI upper 95% CI
## 0.0 44 0 1.000 0.0000 1.000 1.000
## 0.5 23 15 0.632 0.0759 0.500 0.800
## 1.0 12 7 0.432 0.0821 0.297 0.626
##
## trt=group3
## time n.risk n.event survival std.err lower 95% CI upper 95% CI
## 0.0 67 0 1.000 0.0000 1.000 1.000
## 0.5 35 27 0.578 0.0621 0.469 0.714
## 1.0 29 6 0.479 0.0633 0.370 0.621
## Call:
## coxph(formula = Surv(fu1y, death1y) ~ trt, data = dat)
##
## n= 128, number of events= 58
##
## coef exp(coef) se(coef) z Pr(>|z|)
## trtgroup2 1.2811 3.6008 0.6158 2.081 0.0375 *
## trtgroup3 1.2895 3.6308 0.6032 2.138 0.0325 *
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## exp(coef) exp(-coef) lower .95 upper .95
## trtgroup2 3.601 0.2777 1.077 12.04
## trtgroup3 3.631 0.2754 1.113 11.84
##
## Concordance= 0.575 (se = 0.036 )
## Rsquare= 0.053 (max possible= 0.983 )
## Likelihood ratio test= 7.01 on 2 df, p=0.03004
## Wald test = 4.7 on 2 df, p=0.09518
## Score (logrank) test = 5.39 on 2 df, p=0.0676
Death or Hospitalization by STS (yes, no)
## Call: survfit(formula = Surv(fu1y, death.or.hosp.1y) ~ trt, data = dat)
##
## n events median 0.95LCL 0.95UCL
## trt=group1 17 3 NA NA NA
## trt=group2 44 24 0.723 0.356 NA
## trt=group3 67 34 0.742 0.400 NA

## Call: survfit(formula = Surv(fu1y, death.or.hosp.1y) ~ trt, data = dat)
##
## trt=group1
## time n.risk n.event survival std.err lower 95% CI upper 95% CI
## 0.0 17 0 1.000 0.0000 1.000 1
## 0.5 12 2 0.857 0.0935 0.692 1
## 1.0 9 1 0.786 0.1097 0.598 1
##
## trt=group2
## time n.risk n.event survival std.err lower 95% CI upper 95% CI
## 0.0 44 0 1.000 0.0000 1.000 1.000
## 0.5 23 16 0.606 0.0772 0.472 0.778
## 1.0 12 8 0.384 0.0801 0.255 0.578
##
## trt=group3
## time n.risk n.event survival std.err lower 95% CI upper 95% CI
## 0.0 67 0 1.000 0.0000 1.000 1.000
## 0.5 35 28 0.565 0.0620 0.456 0.701
## 1.0 29 6 0.468 0.0628 0.360 0.609
## Call:
## coxph(formula = Surv(fu1y, death.or.hosp.1y) ~ trt, data = dat)
##
## n= 128, number of events= 61
##
## coef exp(coef) se(coef) z Pr(>|z|)
## trtgroup2 1.3742 3.9520 0.6127 2.243 0.0249 *
## trtgroup3 1.3185 3.7378 0.6024 2.189 0.0286 *
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## exp(coef) exp(-coef) lower .95 upper .95
## trtgroup2 3.952 0.2530 1.189 13.13
## trtgroup3 3.738 0.2675 1.148 12.17
##
## Concordance= 0.551 (se = 0.035 )
## Rsquare= 0.059 (max possible= 0.986 )
## Likelihood ratio test= 7.85 on 2 df, p=0.01975
## Wald test = 5.17 on 2 df, p=0.07525
## Score (logrank) test = 5.99 on 2 df, p=0.04998