* Вопрос. Как распечатать несколько диаграмм разброса (по одной на каждого члена группы) и на каждой выделить ту точку данных, которая соответствует данному члену группы? * Ответ. * --------------------------Определим макрос ----------------------. DEFINE !PRINT(!POS=!TOKENS(1)) !DO !counter = 1 !TO !1. * you - Вы, т.е. значение переменной будет указывать на то, что точка соответствует конкретному члену группы. compute you=0. if $casenum=!counter you=!counter. * В принципе, можно создать шаблон графика, чтобы для выделенной точки использовался определённый символ. Но тут она будет выделена просто другим цветом /SCATTERPLOT(BIVAR)=id WITH cumsco BY you /MISSING=LISTWISE . !DOEND. !ENDDEFINE. *----------------------------END OF MACRO ----------------. *Генерируем данные. INPUT PROGRAM. LOOP id=1 TO 10. COMPUTE score=UNIFORM(50). END CASE. END LOOP. END FILE. END INPUT PROGRAM. compute cumsco=0. Do if $casenum=1. compute cumsco=score. else. compute cumsco = lag(cumsco)+score. end if. * Вызываем макрос. !PRINT 10.