tests/sample.stat

   1 title 'Test SAMPLE utility'.
   2
   3 set seed=random.
   4 data list /a 1-2.
   5 begin data.
   6 1
   7 2
   8 3
   9 4
  10 5
  11 6
  12 7
  13 8
  14 9
  15 10
  16 end data.
  17 sample .5.
  18 n 5.
  19 list.