data pique;
     
  input amount response $ count;
  cards;
17 Y 31
17 N 41  
25 Y 22
25 N 50
;


proc freq;
  table amount*response /nocol nopercent chisq measures cl;
  weight count;
run;