OPTIONS LS=75 PS=60;

DATA a;

INFILE 'stroke.dat' ;

INPUT
#1
NO 1-3 CNO 4 DAYS 5 TODAYS 6 LOS 7-9 SURV 10 POSTR 11-12 INTRI 13
DISP 14 AGE 16-17 SEX 18 RACE 19 REL 20 MS 21 INC 22 LANG 23
EMP 24 OCC 25 LIVAR 26 GROUP 28 PC 29 CVAHIST 30 DOM 32 SIDE 33
CONSL 34 MOTFAC 35 MOTARM 36 MOTLEG 37 SENFAC 38 SENARM 39 SENLEG 40
HEMIAN 41 APHA 42 FROFUN 43 PARFUN 44 DEM 45 GAZE 46 COORD 47 DYSAR 48
DYSAR 49 FDX 55 PLACE 56 HIS 57 HFS 58 TIS 59-60 TFS 61-62 CHF 64
MI 65 HBP 66 INCL 67 CA 68 DEMENT 69 DIABET 70 PSYCHO 71 RENAL 72
PULMON 73 ARTH 74 ASHD 75 PVD 76 ARRYTH 77 OTHER 78
#2
NO 1-3 CNO 4
ECG 6 SKXR 7 CHXR 8 LP 9 EEG 10 CERANG 11 ISOSCAN 12 CTSCAN 13 DOPP 14
CARDECH 15 MICROB 16-17 HAEM 18-19 CLCHEM 20-21 URINE 22-23 BLOOD 24-25
NEURO 26 NEUSUR 27 VASSUR 28 SURG 29 AH 30 ACO 31 APL 32 DIAB 33
PAH 34 PACO 35 STER 36 HYOS 37 PDIAB 38 CATH 40 BBTR 41 DECU 42
EYE 43 SUCT 44 IT 45 OX 46 TUBE 47 OTHERB 48 PNEU 50 PULEMB 51
THRPH 52 URININ 53 PYELO 54 DECUBI 55 SHOUL 56 CONT 57 INREP 58
FRACT 59 SEPSIS 60 EMOTDE 61 MIATT 62 CARARR 63 REPSTR 64 CARARRY 65
GI 66 PULEDE 67 NOTEA 69-70 NOTEB 71-72 NOTEC 73-74 NOTED 75-76
NOTEE 77-78
# 3
NO 1-3 CNO 4 STSTAR 5 STNEC 6 STORD 7 STPOA 8-9
STDAY 10-11 STUNIT 12-13 STBSTA 14 STBDAY 15-16 STBUNIT 17-18
STTUNIT 19-20 STTDAY 21-22 JGHA 23-24 JGHB 25-26 FLSA 27-28 FLSB  29-30
OT 31 OTTIME 32-33 OTDAY 34-35 OTUNIT 36-38 OTB 39 OTBDAY 40-41
OTBUNIT 42-44 OTTUNIT 45-47 OTTDAY 48-49 BIADL 50-51 BIAMB 52-53
BPADL 54-55 BPAMB 56-57 LORSADL 58-60 LORSCOG 61-63 OTDUNIT 64-66
OTBDUNI 67-69 OTTDUNI 70-72
# 4
NO 1-3 CNO 4 PT 6 PTTIME 7-8 PTDAY 9-10
PTUNIT 11-13 PTDUNIT 14-16 PTB 17 PTBDAY 18-19 PTBUNIT 20-22 PTBDUNI
23-25 PTTUNIT 26-28 PTTDAY 29-30 PTTDUNI 31-33 BISEN 34-35 BPSEN 37-38
BIRAN 40-41 BPRAN 43-44 BIBAL 46-47 BPBAL 49-50 BIARM 52-53 BPARM 55-56
BILEG 58-59 BPLEG 61-62 BRITOT 64-66 BRPTOT 68-70
# 5
NO 1-3 CNO 4 SS 6
SSTIME 7-8 SSEVAL 10-11 SSDAYC 12-13 SSUNIC 14-16 SSDAYG 18-19
SSUNIG 20-21 SSDAYO 23-24  SSUNITO 25-26 SSATOT 29-31 SSADAY 32-33
SSB 36 SSBEVAL 37-38 SSBDAYC 39-40 SSBUNIC 41-43 SSBDAYG 45-46
SSBUNIG 47-48 SSBDAYO 50-51 SSBUNIO 52-53 SSBTOT 56-58 SSBDAY 59-60
SSTUNIT 63-65 SSTDAY 66-67 SERV 68 WARD 69 OFFWARD 70-71 DCVA 72
DCARR 73 DPNEU 74 DSEPSIS 75 DPULEMB 76 DHA 77 DAS 78 DGI 79
DOTHER 80;

PROC MEANS;

RUN;