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
* Объединение нескольких наблюдений в одно, пример 2.

* Требуется переместить повторные наблюдения info для одного и того же объекта (ID)
  в соседствующие переменные. Номер повторного наблюдения содержится в переменной
  seqn.

* Размещено в SPSSX-L 23.02.2001. Автор: Ray.

DATA LIST LIST /id seqn info.
BEGIN DATA
1,1,9876
1,2,3652
1,3,2514
1,4,2536
1,5,1245
1,6,1258
2,1,1254
2,2,1234
3,1,9512
4,1,6541
4,2,9856
4,3,6542
END DATA.
LIST.


MATCH FILES FILE=* /BY id /LAST=last.
* Примеч.: на месте числа 12 ниже должно быть число, по крайней мере, не меньшее максимального
  значения в переменной seqn в вашем файле.
VECTOR separ(12F8.0).
COMPUTE separ(seqn)=info.
* Примеч.: замените число 12 в двух местах ниже на реальную размерность
  созданного вектора для ваших данных.
AGGREGATE
  /OUTFILE=*
  /BREAK=id
  /separ1 TO separ12 = MAX(separ1 TO separ12).