Fixed crash with GLM and MEANS vs. SPLIT
[pspp] / tests / language / dictionary / split-file.at
1 AT_BANNER([SPLIT FILE])
2
3 AT_SETUP([SPLIT FILE - basic test])
4 AT_DATA([split-file.sps], [dnl
5 title 'Test SPLIT FILE utility'.
6
7 data list notable /X 1 Y 2.
8 begin data.
9 12
10 16
11 17
12 19
13 15
14 14
15 27
16 20
17 26
18 25
19 28
20 29
21 24
22 end data.
23 split file by x.
24 list.
25 ])
26 AT_CHECK([pspp -o pspp.csv split-file.sps])
27 AT_CHECK([cat pspp.csv], [0], [dnl
28 Title: Test SPLIT FILE utility
29
30 Variable,Value,Label
31 X,1,
32
33 Table: Data List
34 X,Y
35 1,2
36 1,6
37 1,7
38 1,9
39 1,5
40 1,4
41
42 Variable,Value,Label
43 X,2,
44
45 Table: Data List
46 X,Y
47 2,7
48 2,0
49 2,6
50 2,5
51 2,8
52 2,9
53 2,4
54 ])
55 AT_CLEANUP
56
57
58
59
60
61 AT_SETUP([SPLIT FILE  - vs procedures])
62 AT_DATA([split-file.sps], [dnl
63
64 * This test is a compendium of those procedures which might
65 * have problems when run in conjunction with SPLITS.
66
67 data list list /a b c q g *.
68 begin data.
69 1 2 3     1  0 
70 4 5 6     0  0
71 7 8 9     1  0
72 10 11 12  0  1
73 13 14 15  1  1
74 end data.
75
76 split file by g.
77
78
79 * The commented out lines are ones which currently fail.
80
81 AGGREGATE outfile='foo' /break=c /X=sum(a). 
82 AUTORECODE variables = c into d .
83 COUNT e = c (1 2 3 4 5 6 7).
84 CROSSTABS a by b.
85 CORRELATIONS /VARIABLES = a b.
86 DELETE VARIABLES a.
87 DESCRIPTIVES e .
88 * EXAMINE c by b.
89 EXPORT outfile='xxx'.
90 FACTOR /VARIABLES = b c d.
91 FILTER BY c.
92 FREQUENCIES b.
93 GLM c BY b.
94 LIST.
95 LOGISTIC REGRESSION q WITH b.
96 MEANS c b.
97 NPAR TESTS /MCNEMAR q.
98 ONEWAY c BY b.
99 QUICK CLUSTER b c.
100 RANK b c.
101 REGRESSION /VARIABLES = c /DEPENDENT = q.
102 RELIABILITY /VARIABLES = c b d. 
103 RENAME VARIABLES (b = bb).
104 ROC bb by q(1).
105 SAMPLE 0.9 .
106 SAVE outfile='xx.sav'.
107 SORT CASES by bb.
108 T-TEST /GROUP=q(0,1) /VARIABLES=bb.
109 USE ALL.
110 * FLIP /VARIABLES = bb, c .
111
112 execute.
113 finish.
114 ])
115
116 AT_CHECK([pspp -O format=csv split-file.sps], [0],[ignore])
117
118 AT_CLEANUP