Update to most recent Gnulib
[pspp-builds.git] / tests / command / npar-wilcoxon.sh
1 #!/bin/sh
2
3 # This program tests the wilcoxon subcommand of npar tests
4
5 TEMPDIR=/tmp/pspp-tst-$$
6 TESTFILE=$TEMPDIR/`basename $0`.sps
7
8 # ensure that top_srcdir and top_builddir  are absolute
9 if [ -z "$top_srcdir" ] ; then top_srcdir=. ; fi
10 if [ -z "$top_builddir" ] ; then top_builddir=. ; fi
11 top_srcdir=`cd $top_srcdir; pwd`
12 top_builddir=`cd $top_builddir; pwd`
13
14 PSPP=$top_builddir/src/ui/terminal/pspp
15
16 STAT_CONFIG_PATH=$top_srcdir/config
17 export STAT_CONFIG_PATH
18
19 LANG=C
20 export LANG
21
22
23 cleanup()
24 {
25      if [ x"$PSPP_TEST_NO_CLEANUP" != x ] ; then 
26         echo "NOT cleaning $TEMPDIR"
27         return ; 
28      fi
29      rm -rf $TEMPDIR
30 }
31
32
33 fail()
34 {
35     echo $activity
36     echo FAILED
37     cleanup;
38     exit 1;
39 }
40
41
42 no_result()
43 {
44     echo $activity
45     echo NO RESULT;
46     cleanup;
47     exit 2;
48 }
49
50 pass()
51 {
52     cleanup;
53     exit 0;
54 }
55
56 mkdir -p $TEMPDIR
57
58 cd $TEMPDIR
59
60 activity="create program 1"
61 cat > $TESTFILE <<  EOF
62 data list notable list /foo * bar * w (f8.0).
63 begin data.
64 1.00     1.00   1
65 1.00     2.00   1
66 2.00     1.00   1
67 1.00     4.00   1
68 2.00     5.00   1
69 1.00    19.00   1
70 2.00     7.00   1
71 4.00     5.00   1
72 1.00    12.00   1
73 2.00    13.00   1
74 2.00     2.00   1
75 12.00      .00  2
76 12.00     1.00  1
77 13.00     1.00  1
78 end data
79
80 variable labels foo "first" bar "second".
81
82 weight by w.
83
84 npar test
85  /wilcoxon=foo with bar (paired)
86  /missing analysis
87  /method=exact.
88
89 EOF
90 if [ $? -ne 0 ] ; then no_result ; fi
91
92
93 activity="run program 1"
94 $SUPERVISOR $PSPP --testing-mode -o raw-ascii $TESTFILE
95 if [ $? -ne 0 ] ; then no_result ; fi
96
97 activity="generate results"
98 cat > $TEMPDIR/results.txt <<EOF
99 1.1 NPAR TESTS.  Ranks
100 #============================#==#=========#============#
101 #                            # N|Mean Rank|Sum of Ranks#
102 #============================#==#=========#============#
103 #second - firstNegative Ranks# 5|     8.60|       43.00#
104 #              Positive Ranks# 8|     6.00|       48.00#
105 #              Ties          # 2|         |            #
106 #              Total         #15|         |            #
107 #============================#==#=========#============#
108
109 1.2 NPAR TESTS.  Test Statistics
110 #======================#==============#
111 #                      #second - first#
112 #======================#==============#
113 #Z                     #          -.18#
114 #Asymp. Sig. (2-tailed)#           .86#
115 #Exact Sig. (2-tailed) #           .89#
116 #Exact Sig. (1-tailed) #           .45#
117 #======================#==============#
118
119 EOF
120 if [ $? -ne 0 ] ; then no_result ; fi
121
122
123 activity="compare output 1"
124 diff pspp.list $TEMPDIR/results.txt
125 if [ $? -ne 0 ] ; then fail ; fi
126
127
128
129 # No weights this time. But some missing values
130 activity="create program 2"
131 cat > $TESTFILE <<  EOF
132 data list notable list /foo * bar * dummy *.
133 begin data.
134 1.00     1.00    1
135 1.00     2.00    1
136 2.00     1.00    1
137 1.00     4.00    .
138 2.00     5.00    .
139 1.00    19.00    .
140 2.00     7.00    1
141 4.00     5.00    1
142 1.00    12.00    1
143 2.00    13.00    1
144 2.00     2.00    1
145 12.00      .00   1
146 12.00      .00   1
147 34.2       .     1
148 12.00     1.00   1  
149 13.00     1.00   1
150 end data
151
152 variable labels foo "first" bar "second".
153
154 npar test
155  /wilcoxon=foo with bar (paired)
156  /missing analysis
157  /method=exact.
158
159 EOF
160 if [ $? -ne 0 ] ; then no_result ; fi
161
162
163 activity="run program 2"
164 $SUPERVISOR $PSPP --testing-mode -o raw-ascii $TESTFILE
165 if [ $? -ne 0 ] ; then no_result ; fi
166
167 activity="compare output 2"
168 diff pspp.list $TEMPDIR/results.txt
169 if [ $? -ne 0 ] ; then fail ; fi
170
171
172
173 pass;