Create the data set SITES with regional data. Sites contains a region number for each state and the total number of hazardous waste sites in each state. The STFIPS function converts the state postal codes to FIPS state codes.

data sites;
   length stcode $ 2;
   input region stcode $ sites @@;
   state=stfips(stcode);
   datalines;
 6 AR  12 10 AK   7  4 AL  12  9 AZ  10
 9 CA  90  8 CO  15  1 CT  15  3 DE  18
 4 FL  52  4 GA  15  9 HI   4  7 IA  16
10 ID   8  5 IL  38  5 IN  30  7 KS  10
 4 KY  16  6 LA  15  1 MA  30  3 MD  13
 1 ME  12  5 MI  72  5 MN  30  7 MO  22
 4 MS   1  8 MT   8  4 NC  22  8 ND   0
 7 NE  10  1 NH  18  2 NJ 105  6 NM   9
 9 NV   1  2 NY  78  5 OH  34  6 OK  10
10 OR  10  3 PA 100  4 PR  56  1 RI  12
 4 SC  26  8 SD   2  4 TN  14  6 TX  26
 8 UT  12  3 VA  25  1 VT   8 10 WA  49
 5 WI  40  3 WV   6  8 WY   3
;
run;