Data Neuralgia;
length Discomfort $ 2;
input Treatment $ Gender $ Age Duration Discomfort $ @@;
label Treatment='Treatment Regimen'
Gender='Gender of Patient'
Age='Age of Patient'
Discomfort='Amount of Discomfort Experienced';
datalines;
A M 71 17 P A F 63 27 PF A F 69 18 P
P F 68 1 PF B M 74 16 PF P F 67 30 PF
P M 66 26 P B F 67 28 PF B F 77 16 PF
A F 71 12 PF B F 72 50 PF B F 76 9 P
B F 66 12 PF A M 62 42 PF P F 64 1 P
A F 64 17 PF P M 74 4 PF A F 72 25 PF
P M 70 1 P B M 66 19 PF B M 59 29 PF
A F 64 30 PF A M 70 28 PF A M 69 1 PF
B F 78 1 PF P M 83 1 P B F 69 42 PF
B M 75 30 P P M 77 29 P P F 79 20 P
A M 70 12 PF A F 69 12 PF B F 65 14 PF
B M 70 1 PF B M 67 23 PF A M 76 25 P
P M 78 12 P B M 77 1 P B F 69 24 PF
P M 66 4 P P F 65 29 PF P M 60 26 P
A M 78 15 P B M 75 21 P A F 67 11 PF
P F 72 27 PF P F 70 13 P A M 75 6 P
B F 65 7 PF P F 68 27 P P M 68 11 P
P M 67 17 P B M 70 22 PF A M 65 15 PF
P F 67 1 P A M 67 10 PF P F 72 11 P
A F 74 1 PF B M 80 21 P A F 69 3 PF
;
run;