以斯帖統計顧問公司

首先在[程式一]建立10筆資料，包含no, age ,sex等變項。

[程式一]
data aa;
input no age sex $ ;
cards;
1 23 F
2 24 F
3 52 M
4 36 M
5 12 M
6 18 F
7 42 F
8 19 M
9 37 M
10 29 F
;
proc print;
run;

隨機抽樣的執行程序為surveyselect, 方法為simple random sampling (method = SRS)，rep(Replicate) =1 , 為限定重覆抽取的次數為1次，若定為2，會再抽第2次。sampsize = 4 即隨機抽出4筆。seed = 12345中的seed係指定隨機抽樣起點，後面的12345的數字可以任意給予，每次給的數字若固定，抽出的樣本則固定，因此並非真正的隨機, 而是偽隨機(psudo-random)，若不給定seed指令，每次抽出的樣本將不固定。

[程式二]

proc surveyselect data = aa method = SRS rep = 1 
sampsize = 4 seed = 12345 out = bb;
id _all_; /*樣本取出後, 列出所有的欄位 */
run;
proc print data = bb noobs;
run;

Replicate no age sex

1 3 52 M
1 6 18 F
1 8 19 M
1 10 29 F