pintos-os.org Git - pspp/blob - tests/language/xforms/count.at

   1 AT_BANNER([COUNT])
   2
   3 AT_SETUP([COUNT -- numeric data])
   4 AT_DATA([count.sps], [dnl
   5 DATA LIST LIST /x * y *.
   6 BEGIN DATA.
   7 1 2
   8 2 3
   9 4 5
  10 2 2
  11 5 6
  12 END DATA.
  13
  14 COUNT c=x y (2).
  15
  16 LIST.
  17 ])
  18 AT_CHECK([pspp -O format=csv count.sps], [0], [dnl
  19 Table: Reading free-form data from INLINE.
  20 Variable,Format
  21 x,F8.0
  22 y,F8.0
  23
  24 Table: Data List
  25 x,y,c
  26 1.00,2.00,1.00
  27 2.00,3.00,1.00
  28 4.00,5.00,.00
  29 2.00,2.00,2.00
  30 5.00,6.00,.00
  31 ])
  32 AT_CLEANUP
  33
  34 AT_SETUP([COUNT -- string data])
  35 AT_DATA([count.sps], [dnl
  36 TITLE 'Test COUNT transformation'.
  37
  38 DATA LIST /v1 to v2 1-4(a).
  39 BEGIN DATA.
  40 1234
  41 321
  42 2 13
  43 4121
  44 1104
  45 03 4
  46 0193
  47 END DATA.
  48 COUNT c=v1 to v2('2',' 4','1').
  49 LIST.
  50 ])
  51 AT_CHECK([pspp -O format=csv count.sps], [0], [dnl
  52 Title: Test COUNT transformation
  53
  54 Table: Reading 1 record from INLINE.
  55 Variable,Record,Columns,Format
  56 v1,1,1-  2,A2
  57 v2,1,3-  4,A2
  58
  59 Table: Data List
  60 v1,v2,c
  61 12,34,.00
  62 32,1 ,1.00
  63 2 ,13,1.00
  64 41,21,.00
  65 11,04,.00
  66 03,4,1.00
  67 01,93,.00
  68 ])
  69 AT_CLEANUP