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
|
dnl PSPP - a program for statistical analysis.
dnl Copyright (C) 2017 Free Software Foundation, Inc.
dnl
dnl This program is free software: you can redistribute it and/or modify
dnl it under the terms of the GNU General Public License as published by
dnl the Free Software Foundation, either version 3 of the License, or
dnl (at your option) any later version.
dnl
dnl This program is distributed in the hope that it will be useful,
dnl but WITHOUT ANY WARRANTY; without even the implied warranty of
dnl MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
dnl GNU General Public License for more details.
dnl
dnl You should have received a copy of the GNU General Public License
dnl along with this program. If not, see <http://www.gnu.org/licenses/>.
dnl
AT_BANNER([COUNT])
AT_SETUP([COUNT -- numeric data])
AT_DATA([count.sps], [dnl
DATA LIST LIST /x y.
BEGIN DATA.
1 2
2 3
4 5
2 2
5 6
7 2
. 2
END DATA.
MISSING VALUES x(7)/y(3).
COUNT c=x y (2)/d=x y(7)/e=x y(missing)/f=x y(sysmis).
FORMATS ALL(F1).
LIST.
])
AT_CHECK([pspp -O format=csv count.sps], [0], [dnl
Table: Reading free-form data from INLINE.
Variable,Format
x,F8.0
y,F8.0
Table: Data List
x,y,c,d,e,f
1,2,1,0,0,0
2,3,1,0,1,0
4,5,0,0,0,0
2,2,2,0,0,0
5,6,0,0,0,0
7,2,1,1,1,0
.,2,1,0,1,1
])
AT_CLEANUP
AT_SETUP([COUNT -- string data])
AT_DATA([count.sps], [dnl
TITLE 'Test COUNT transformation'.
DATA LIST /v1 to v2 1-4(a).
BEGIN DATA.
1234
321
2 13
4121
1104
03 4
0193
END DATA.
COUNT c=v1 to v2('2',' 4','1').
LIST.
])
AT_CHECK([pspp -O format=csv count.sps], [0], [dnl
Table: Reading 1 record from INLINE.
Variable,Record,Columns,Format
v1,1,1-2,A2
v2,1,3-4,A2
Table: Data List
v1,v2,c
12,34,.00
32,1,1.00
2,13,1.00
41,21,.00
11,04,.00
03,4,1.00
01,93,.00
])
AT_CLEANUP
|
