Add copyright and licence notices to files which lack them.
[pspp] / tests / language / dictionary / split-file.at
1 dnl PSPP - a program for statistical analysis.
2 dnl Copyright (C) 2017 Free Software Foundation, Inc.
3 dnl 
4 dnl This program is free software: you can redistribute it and/or modify
5 dnl it under the terms of the GNU General Public License as published by
6 dnl the Free Software Foundation, either version 3 of the License, or
7 dnl (at your option) any later version.
8 dnl 
9 dnl This program is distributed in the hope that it will be useful,
10 dnl but WITHOUT ANY WARRANTY; without even the implied warranty of
11 dnl MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12 dnl GNU General Public License for more details.
13 dnl 
14 dnl You should have received a copy of the GNU General Public License
15 dnl along with this program.  If not, see <http://www.gnu.org/licenses/>.
16 dnl AT_BANNER([SPLIT FILE])
17
18 AT_SETUP([SPLIT FILE - basic test])
19 AT_DATA([split-file.sps], [dnl
20 title 'Test SPLIT FILE utility'.
21
22 data list notable /X 1 Y 2.
23 begin data.
24 12
25 16
26 17
27 19
28 15
29 14
30 27
31 20
32 26
33 25
34 28
35 29
36 24
37 end data.
38 split file by x.
39 list.
40 ])
41 AT_CHECK([pspp -o pspp.csv split-file.sps])
42 AT_CHECK([cat pspp.csv], [0], [dnl
43 Title: Test SPLIT FILE utility
44
45 Variable,Value,Label
46 X,1,
47
48 Table: Data List
49 X,Y
50 1,2
51 1,6
52 1,7
53 1,9
54 1,5
55 1,4
56
57 Variable,Value,Label
58 X,2,
59
60 Table: Data List
61 X,Y
62 2,7
63 2,0
64 2,6
65 2,5
66 2,8
67 2,9
68 2,4
69 ])
70 AT_CLEANUP
71
72
73
74
75
76 AT_SETUP([SPLIT FILE  - vs procedures])
77 AT_DATA([split-file.sps], [dnl
78
79 * This test is a compendium of those procedures which might
80 * have problems when run in conjunction with SPLITS.
81
82 data list list /a b c q g *.
83 begin data.
84 1 2 3     1  0 
85 4 5 6     0  0
86 7 8 9     1  0
87 10 11 12  0  1
88 13 14 15  1  1
89 end data.
90
91 split file by g.
92
93
94 * The commented out lines are ones which currently fail.
95
96 AGGREGATE outfile='foo' /break=c /X=sum(a). 
97 AUTORECODE variables = c into d .
98 COUNT e = c (1 2 3 4 5 6 7).
99 CROSSTABS a by b.
100 CORRELATIONS /VARIABLES = a b.
101 DELETE VARIABLES a.
102 DESCRIPTIVES e .
103 EXAMINE c by b.
104 EXPORT outfile='xxx'.
105 FACTOR /VARIABLES = b c d.
106 FILTER BY c.
107 FREQUENCIES b.
108 GLM c BY b.
109 GRAPH /HISTOGRAM = b .
110 GRAPH /SCATTERPLOT(BIVARIATE) = b with c by e .
111 GRAPH /BAR (GROUPED) = MEAN(b) by c by e.
112 GRAPH /BAR = COUNT BY  b.
113 LIST.
114 LOGISTIC REGRESSION q WITH b.
115 MEANS c b.
116 NPAR TESTS /MCNEMAR q.
117 ONEWAY c BY b.
118 QUICK CLUSTER b c.
119 RANK b c.
120 REGRESSION /VARIABLES = c /DEPENDENT = q.
121 RELIABILITY /VARIABLES = c b d. 
122 RENAME VARIABLES (b = bb).
123 ROC bb by q(1).
124 SAMPLE 0.9 .
125 SAVE outfile='xx.sav'.
126 SORT CASES by bb.
127 T-TEST /GROUP=q(0,1) /VARIABLES=bb.
128 USE ALL.
129 FLIP /VARIABLES = bb, c .
130
131 execute.
132 finish.
133 ])
134
135 AT_CHECK([pspp -O format=csv split-file.sps], [0],[ignore])
136
137 AT_CLEANUP