/*   code.sas    */
DATA ONE;
   INPUT rep a $  b $  Y ;
   CARDS;
1  a1 b1 12
1  a1 b2 23
1  a1 b3 53
1  a2 b1 35
1  a2 b2 23
1  a2 b3 53
1  a1 b1 12
2  a1 b2 23
2  a1 b3 53
2  a2 b1 35
2  a2 b2 23
2  a2 b3 53
proc freq; tables rep a b a*b /list;
   run;