options ls=90;

filename foo url "http://www.uvm.edu/~abh/stat295/datasets/beetles.dat";

data beetles;
     infile foo;
     input date:mmddyy10. site trap beetles;
     year = year(date);
drop date;
run;

proc sort data=beetles;
     by year site;
run;

data site_totals;
     set beetles;
     by year site;
     if first.site then beetle_totals = 0;
        beetle_totals + beetles;
     if last.site;
drop trap beetles;
run;

proc print data=site_totals;
title "Total beetles at each site for each year";
run;