分布拟合度检验
function [h,sig]=chi2test(n,x,p,alpha)
%[h,sig]=chi2test(n,x,p,alpha)
% 分布拟合度检验
% n: 数据总数
% x: 实际组频数向量
% p: 理论组频数向量
% h：返回1表示拒绝H0，返回0表示接受H0。
% sig：返回检验统计量的值，sig< alpha 时h=1

具体程序见附件