* Из "широкого" к "узкому" с индикатором наличия наблюдения. * Автор: Raynald Levesque. DATA LIST LIST /id1 x1 x2 x3 x4 x5. BEGIN DATA 1 2 . . 1 3 2 . . 2 4 5 3 1 2 3 . . END DATA. LIST. VECTOR x=x1 TO x5 /ind_x(5F8.0). LOOP #cnt=1 TO 5. COMPUTE x=x(#cnt). LOOP #cnt2=1 TO 5. DO IF #cnt=#cnt2. COMPUTE ind_x(#cnt2)=~MISSING(x). ELSE. COMPUTE ind_x(#cnt2)=$SYSMIS. END IF. END LOOP. XSAVE OUTFILE='c:\\temp\\temp.sav' /KEEP id1 x ind_x1 TO ind_x5. END LOOP. EXECUTE. GET FILE='c:\\temp\\temp.sav'.