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