* copy and paste `srs` and `est_srs` SAS macros into a new program editor;
* then run them before using this program;

* url for data in INFILE;
filename weather url 'http://webpages.uidaho.edu/~renaes/Data/weather.csv';

data weather;
length Station $ 17;
infile weather firstobs = 2 dlm=',';
input Station $ JanTemp JanPrecip FebTemp FebPrecip MarchTemp MarchPrecip AprilTemp AprilPrecip MayTemp MayPrecip;
marchwarm=(MarchTemp gt 32);
run;

proc print;
run;

proc means;
var Marchwarm;
run;

%srs(frame=weather,npop=88,n=25,sample=weather_srs,seed=44676);
proc means data=weather_srs;
run;

proc print data=weather_srs;
run;

%est_srs(sample=weather_srs,npop=88,response=marchwarm,param=proportion);