* Осуществить случайную выборку объёма 40 из каждой страты. * Хотя в следующем примере только 2 страты (группы), метод работает при любом числе групп. * Размещено в SPSSX-L. Автор: Raynald Levesque, 18.06.2005 * http://www.spsstools.net INPUT PROGRAM. LOOP id=1 TO 949. - COMPUTE grp=(id<825). - END CASE. END LOOP. END FILE. END INPUT PROGRAM. FREQ VAR=grp. COMPUTE draw=UNIFORM(1). RANK VARIABLES=draw BY grp /RANK INTO rdraw . SELECT IF rdraw<41. FREQ VAR=grp.