blob: 6f1c7d104ec234ee951e03f5a5cccee45879a43d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
|
//Caption:Two-Samples Tests
//One-tailed two-samples sign test with normal approximation
//Example9.14
//page333
//Test 1: Ho: uX = uY or p = 1/2
// H1: uX > uY or p > 1/2
clc;
n =14; //Number of observations of each sample
plus_signs = 11;
minus_signs = 3;
alpha = 0.05; //significance level
p = 1/2;
q = 1-p;
u = n*p; // its mean
Var = n*p*q; //its variance
Std = sqrt(Var);
Z_Calc = (plus_signs-u)/Std;
Z_Stand = standard_normal_zstat(alpha);
disp(Z_Calc,'Calculated Z value Zcal=')
disp(Z_Stand,'Standard Z statistic Zstand =')
if (Z_Calc < Z_Stand)
disp('Since the calculated z value is less than standard z value')
disp('Accept Null Hypothesis Ho')
else
disp('Since the calculated z value is greater than standard z value')
disp('Reject Null Hypothesis Ho')
end
//Result
//Calculated Z value Zcal=
//
// 2.1380899
//
// Standard Z statistic Zstand =
//
// 1.64
//
// Since the calculated z value is greater than standard z value
//
// Reject Null Hypothesis Ho
|
