pintos-os.org Git - pspp/blob - tests/language/stats/flip.at

   1 AT_BANNER([FLIP command])
   2
   3 AT_SETUP([FLIP with NEWNAMES])
   4 AT_DATA([flip.sps], [dnl
   5 data list notable /N 1 (a) a b c d 2-9.
   6 list.
   7 begin data.
   8 v 1 2 3 4 5
   9 w 6 7 8 910
  10 x1112131415
  11 y1617181920
  12 z2122232425
  13 end data.
  14 temporary.
  15 compute e = a.
  16 flip newnames=n.
  17 list.
  18 flip.
  19 list.
  20 ])
  21 AT_CHECK([pspp -O format=csv flip.sps], [0], [dnl
  22 Table: Data List
  23 N,a,b,c,d
  24 v,1,2,3,4
  25 w,6,7,8,9
  26 x,11,12,13,14
  27 y,16,17,18,19
  28 z,21,22,23,24
  29
  30 flip.sps:12: warning: FLIP: FLIP ignores TEMPORARY.  Temporary transformations will be made permanent.
  31
  32 Table: Data List
  33 CASE_LBL,v,w,x,y,z
  34 a       ,1.00,6.00,11.00,16.00,21.00
  35 b       ,2.00,7.00,12.00,17.00,22.00
  36 c       ,3.00,8.00,13.00,18.00,23.00
  37 d       ,4.00,9.00,14.00,19.00,24.00
  38 e       ,1.00,6.00,11.00,16.00,21.00
  39
  40 Table: Data List
  41 CASE_LBL,a,b,c,d,e
  42 v       ,1.00,2.00,3.00,4.00,1.00
  43 w       ,6.00,7.00,8.00,9.00,6.00
  44 x       ,11.00,12.00,13.00,14.00,11.00
  45 y       ,16.00,17.00,18.00,19.00,16.00
  46 z       ,21.00,22.00,23.00,24.00,21.00
  47 ])
  48 AT_CLEANUP
  49
  50 AT_SETUP([FLIP without NEWNAMES])
  51 AT_DATA([flip.sps], [dnl
  52 data list list notable /v1 to v10.
  53 format all(f2).
  54 begin data.
  55 1 2 3 4 5 6 7 8 9 10
  56 4 5 6 7 8 9 10 11 12 13
  57 end data.
  58
  59 list.
  60
  61 flip.
  62 list.
  63 ])
  64 AT_CHECK([pspp -O format=csv flip.sps], [0], [dnl
  65 Table: Data List
  66 v1,v2,v3,v4,v5,v6,v7,v8,v9,v10
  67 1,2,3,4,5,6,7,8,9,10
  68 4,5,6,7,8,9,10,11,12,13
  69
  70 Table: Data List
  71 CASE_LBL,VAR000,VAR001
  72 v1      ,1.00,4.00
  73 v2      ,2.00,5.00
  74 v3      ,3.00,6.00
  75 v4      ,4.00,7.00
  76 v5      ,5.00,8.00
  77 v6      ,6.00,9.00
  78 v7      ,7.00,10.00
  79 v8      ,8.00,11.00
  80 v9      ,9.00,12.00
  81 v10     ,10.00,13.00
  82 ])
  83 AT_CLEANUP