signtest0.m

统计学习的Matlab程序:包括各种假设检验,模型识别和线性回归等.

function [h,t,t1]=signtest0(X1,X2,a) 
%SIGNTEST0 基于成对数据的检验（t检验）
%参考文献：《应用数理统计》（叶慈南编）p118. 
%调用格式：[h,t,t1]=signtest0(X1,X2，a) 
%X1,X2为样本，a为显著性水平 

%By：Ji Lin
%Email: [e-mail]
%Blog: http://linji526.spaces.live.com
%Date: 2007，2008/08/18

if nargin<3 
    a=0.05;
end 
X=X1-X2;n=length(X); 
t=mean(X)*sqrt(n)/std(X); 
t1=tinv(1-a/2,n-1); 
if t1 <= t 
    h = '拒绝H0'; 
else 
    h = '接受H0'; 
end