How many times two teams face head to head: need count

[Veeresh]

Sample data

DATA HEAD_COUNT;
INFILE CARDS;
INPUT TEAM1$ TEAM2$;
CARDS;
IND AUS
AUS IND
NZ IND
IND NZ
PAK IND
WI PAK
PAK AUS
;
RUN;

Required output :

Team           Head_count
IND - AUS    2
NZ - IND      2
PAK - IND    1
WI - PAK      1
PAK - AUS   1

I treid with proc freq cross column approach  but not able to acheive final results 

[Kurt_Bremser · Accepted solution]

Use call sort() to sort the teams per observation, and then proc summary to get the count:

data head_count;
input team1 $ team2 $;
datalines;
IND AUS
AUS IND
NZ IND
IND NZ
PAK IND
WI PAK
PAK AUS
;

data sorted;
set head_count;
call sort(of team:);
run;

proc summary data=sorted nway;
class team1 team2;
output out=want (drop=_type_ rename=(_freq_=count));
run;