data test;
   input a b c d;
   min=min(a,b,c,d);
   max=max(a,b,c,d);
   if sum(max=a,max=b,max=c,max=d)>=3 then i=max;
   else if sum(min=a,min=b,min=c,min=d)>=3 then i=min;
   drop min max;
   cards;
1 1 1 1
1 2 3 4
8 8 8 3
9 9 1 9
2 2 3 3
6 6 6 7
11 11 11 12
888 888 222 888
8 88 888 12
;

三个或三个以上

data one;
input a b c d;
cards;
1 2 1 1
2 3 1 1
0 0 1 2
2 2 2 2
1 1 1  1
;
run;
data two;
set one;
if sum(a=1,b=1, c=1,d=1) ge 3 then i=1;
else if  sum(a=2,b=2, c=2,d=2) ge 3 then i=2;
else i=0;
run;