Example 2 for PROC ICLIFETEST

/****************************************************************/
/*          S A S   S A M P L E   L I B R A R Y                 */
/*                                                              */
/*    NAME: ICLFTEX2                                            */
/*   TITLE: Example 2 for PROC ICLIFETEST                       */
/* PRODUCT: STAT                                                */
/*  SYSTEM: ALL                                                 */
/*    KEYS: breast cosmesis data                                */
/*   PROCS: ICLIFETEST                                          */
/*    DATA:                                                     */
/*                                                              */
/* SUPPORT: chaguo                                              */
/*     REF: PROC ICLIFETEST, EXAMPLE 2                          */
/*    MISC:                                                     */
/****************************************************************/

data RT;
   input lTime rTime @@;
   trt = ' RT';
   datalines;
45  .  25 37  37  .
 6 10  46  .   0  5
 0  7  26 40  18  .
46  .  46  .  24  .
46  .  27 34  36  .
 7 16  36 44   5 11
17  .  46  .  19 35
 7 14  36 48  17 25
37 44  37  .  24  .
 0  8  40  .  32  .
 4 11  17 25  33  .
15  .  46  .  19 26
11 15  11 18  37  .
22  .  38  .  34  .
46  .   5 12  36  .
46  .
;

data RCT;
   input lTime rTime @@;
   trt = 'RCT';
   datalines;
 8 12   0  5  30 34
 0 22   5  8  13  .
24 31  12 20  10 17
17 27  11  .   8 21
17 23  33 40   4  9
24 30  31  .  11  .
16 24  13 39  14 19
13  .  19 32   4  8
11 13  34  .  34  .
16 20  13  .  30 36
18 25  16 24  18 24
17 26  35  .  16 60
32  .  15 22  35 39
23  .  11 17  21  .
44 48  22 32  11 20
14 17  10 35  48  .
;

data BCS;
   set RT RCT;
run;

proc iclifetest data=BCS plots=survival(cl) impute(seed=1234);
   strata trt;
   time (lTime, rTime);
run;

proc iclifetest data=BCS plots=survival(cl nodash) impute(seed=1234);
   strata trt;
   time (lTime, rTime);
run;

proc iclifetest data=BCS plots=survival(cl strata=panel) impute(seed=1234);
   strata trt;
   time (lTime, rTime);
run;