* Получить число уникальных значений для каждого наблюдения. *(см. также синтаксис http://www.spsstools.ru/Syntax/MultipleResp/CountUniqueOccurencesOfAMultipleResponse.txt - примеч. пер.). * Размещено в SPSSX-L 19.3.2001. Автор: Allen Reese . * Синтаксис предполагает предварительное вычисление пределов изменения значений в переменных sport1-sport6 - примеч. пер. DATA LIST LIST /subj Sport1 Sport2 Sport3 Sport4 Sport5 Sport6. BEGIN DATA 1 1 5 6 7 30 12 2 1 1 23 6 3 3 7 45 45 15 4 6 6 12 12 END DATA. LIST. vector ss(55,f2.0). do repeat sport=sport1 to sport6. if (sport>0 and sport<56) ss(sport)=1. end repeat. compute nsports=0. loop #N=1 to 55. if ( ss(#N) = 1 ) nsports=nsports+1. end loop. MATCH FILES FILE=* /BY=subj /DROP=ss1 to ss55. execute.