可以使用surveyselect过程进行抽样，详细的语法说明请参考帮助文档。。
data mm;
        input x    var1   var2;
cards;
1    33     24
1    20     18
1    67     54
1    38     90
1    28     30
1    26     9
2    18     65
2    80     35
2    90     92
2    77     55
2    88     66
2    3      49
;
proc surveyselect data=mm out=a(keep=x var1 var2) method=srs n=4;
        strata x;
run;
proc print data=a;
run;
proc sql ;
        create table b as
                select * from mm
                except
                select * from a;
proc print data=b;
run;