Wolfram Research

World Cup 1988 Network

Source Notebook

Network describing the 22 soccer teams which participated in the World Cup in Paris 1998

The World cup 1988 network shows contracts that players of the national team have in other countries. The contracts constitute a player market where national teams export players to other countries. Members of the 22 teams had contracts in altogether 35 countries. Edge annotation "ExportedPlayer" contains the number of players exported.

(35 vertices, 118 edges)

Examples

Basic Examples (2) 

Retrieve the graph:

In[1]:=
ResourceData["World Cup 1988 Network", "Graph"]
Out[1]=

Summary properties:

In[2]:=
ResourceData["World Cup 1988 Network", "Summary"]
Out[2]=

Basic Applications (1) 

Show a value plot of players exported by country:

In[3]:=
g = ResourceData[\!\(\*
TagBox["\"\<World Cup 1988 Network\>\"",
#& ,
BoxID -> "ResourceTag-World Cup 1988 Network-Input",
AutoDelete->True]\)];
In[4]:=
countries = VertexList[g]
Out[4]=
In[5]:=
GeoRegionValuePlot[
 Append[KeyMap[CountryData, KeyDrop[GroupBy[EdgeList[g], First, Length], {"Korea Republic", "Scotland", "Yugoslavia"}]], {
  Entity["Country", "SouthKorea"] -> 2, Entity["AdministrativeDivision", {
     "Scotland", "UnitedKingdom"}] -> 2, EntityClass["Country", "FormerYugoslaviaMembers"] -> 6}], Sequence[
 GeoProjection -> "WinkelTripel", ColorFunction -> (RGBColor[# + 1, 1.2 - #, 0]& )]]
Out[5]=

Wolfram Research, "World Cup 1988 Network" from the Wolfram Data Repository (2019) 

Data Resource History

Source Metadata

Publisher Information