Вычислить среднее по m переменным, где m берётся из другой переменной

* Подсчёт среднего по m переменным, где m берётся из переменной файла данных.
* В данном примере m берётся из переменной gmplans. Например, для второго наблюдения
* (gmplans=2) нам нужно среднее значение по первым двум переменным, т.е. по переменным fpr_iy1 иfpr_iy2.
* Автор: Raynald Levesque, февраль 2004.
* http://www.spsstools.net

NEW FILE.
DATA LIST LIST /gmplans fpr_iy1 TO fpr_iy4.
BEGIN DATA
1 4 3 2 1
2 4 3 2 1 
3 4 3 2 1 
4 4 3 2 1
0 4 3 2 1
2 4 5 m 6
1 1 m m m
END DATA.

COMPUTE aver=MEAN(fpr_iy1 to fpr_iy4).
LIST aver.
COMPUTE aver=MEAN.2(fpr_iy1 to fpr_iy4).
LIST aver.

VECTOR v1 = fpr_iy1 TO fpr_iy4 .
LOOP #i = 1 TO gmplans.
- DO IF #i=1.
-    COMPUTE aver = v1(#i) .
- ELSE.
-    COMPUTE aver=SUM(aver, v1(#i)).
-    IF #i=gmplans aver=aver/#i.
- END IF.
END LOOP .

DESCRIPTIVES
  VARIABLES=aver
  /STATISTICS=MEAN STDDEV MIN MAX .