* Как осуществить n независимых выборок объёма m из одного и того же файла? * Ответ размещён в SPSSX-L. Автор: Raynald Levesque, rlevesque@videotron.ca, 14.04.2001. * www.spsstools.net PRESERVE. SET MPRINT=yes. *///////////////////////////////. DEFINE !getsamp (nbcases=!TOKENS(1) /nbfiles=!TOKENS(1) ) !DO !var=1 !TO !nbfiles GET FILE='C:\\Program Files\\SPSS\\GSS93 subset.sav'. COMPUTE draw=UNIFORM(1). COMPUTE dummy=1. RANK VARIABLES=draw BY dummy /RANK INTO rank1. SELECT IF rank1 LE !nbcases. SAVE OUTFILE=!QUOTE(!CONCAT("c:\\Temp\\new file ",!var,".sav")). !DOEND !ENDDEFINE. *///////////////////////////////. *Следующая строка вызывает макрос, который осуществляет нужные выборки. !getsamp nbcases=300 nbfiles=4. RESTORE.