请问R*C列联表卡方检验确切概率的程序

请问一下，我有如下程序，请问怎样把它修改，让它可以既可以算出普通的卡方的P值，也可以算出它的确切概率，谢谢高手指点-（在算四格表时SAS会自动给出确切概率，当R或C超过3时，SAS就不会自动给出确切概率）！
data a;                                 
  input r c f @@;
cards;
1 1  15
1  2   4
2  1   1
2   2   5
3   1   7
3    2   5
；
proc  freq;
  weight f;
  tables r*c
  /chisq;
run;

1. proc  freq;
   
2.   weight f;
   
3.   tables r*c
   
4.   /chisq;
   
5.   exact fisher;
   
6. run;

复制代码