How do I figure out an average margin of points between two datasets?

[zoeshrugged]

Hi, I have two datasets and I have the points earned and the points given up for a list of sports teams. I want to find out the highest margin between points earned-points given up.

For example, if it was like this:

Team	Points Earned	Points Given up
Lions	20	10
Ravens	30	21
Broncos	30	5

Then we would know the Broncos had the highest margin. How do I write a formula for this?

Any assistance would be greatly appreciated!!

[stat_sas]

data have;
input team $ points_earned points_give;
cards;
Lions 20 10
Ravens 30 21
Broncos 30 5
;

proc sql;
select * from have
having points_earned-points_give=max(points_earned-points_give);
quit;

[Loko]

Hello,

data have;
input  Team $ Points_Earned Points_Given_up ;
datalines;
Lions 20 10
Ravens 30 21
Broncos 30 5
Tigers 80 75
Baggers 80 55
;

data want (drop=i dif record) ;

length record $ 30;

do until(last);
set have end=last;
i+1;

if dif <Points_Earned-Points_Given_up then
do;
  dif=Points_Earned-Points_Given_up;
  record=i;
end;
else if dif=Points_Earned-Points_Given_up then
record=cats(i,"|",record);
end;

i=1;
if find(record,"|") then
do while (not(missing(scan(record,i,"| "))));
  acces=input(scan(record,i,"|"),8.);
  set have point=acces;
  output;
  i=i+1;
end;
else
do;
  acces=input(compress(record),8.);
  set have point=acces;
output;
end;
run;