output: Introduce pivot tables.
[pspp] / tests / language / xforms / count.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
17 AT_BANNER([COUNT])
18
19 AT_SETUP([COUNT -- numeric data])
20 AT_DATA([count.sps], [dnl
21 DATA LIST LIST /x y.
22 BEGIN DATA.
23 1 2
24 2 3
25 4 5
26 2 2
27 5 6
28 7 2
29 . 2
30 END DATA.
31
32 MISSING VALUES x(7)/y(3).
33
34 COUNT c=x y (2)/d=x y(7)/e=x y(missing)/f=x y(sysmis).
35
36 FORMATS ALL(F1).
37
38 LIST.
39 ])
40 AT_CHECK([pspp -O format=csv count.sps], [0], [dnl
41 Table: Reading free-form data from INLINE.
42 Variable,Format
43 x,F8.0
44 y,F8.0
45
46 Table: Data List
47 x,y,c,d,e,f
48 1,2,1,0,0,0
49 2,3,1,0,1,0
50 4,5,0,0,0,0
51 2,2,2,0,0,0
52 5,6,0,0,0,0
53 7,2,1,1,1,0
54 .,2,1,0,1,1
55 ])
56 AT_CLEANUP
57
58 AT_SETUP([COUNT -- string data])
59 AT_DATA([count.sps], [dnl
60 TITLE 'Test COUNT transformation'.
61
62 DATA LIST /v1 to v2 1-4(a).
63 BEGIN DATA.
64 1234
65 321 
66 2 13
67 4121
68 1104
69 03 4
70 0193
71 END DATA.
72 COUNT c=v1 to v2('2',' 4','1').
73 LIST.
74 ])
75 AT_CHECK([pspp -O format=csv count.sps], [0], [dnl
76 Table: Reading 1 record from INLINE.
77 Variable,Record,Columns,Format
78 v1,1,1-  2,A2
79 v2,1,3-  4,A2
80
81 Table: Data List
82 v1,v2,c
83 12,34,.00
84 32,1,1.00
85 2,13,1.00
86 41,21,.00
87 11,04,.00
88 03,4,1.00
89 01,93,.00
90 ])
91 AT_CLEANUP