Basic Examples
Basic Examples
Retrieve the graph:
In[]:=
ResourceData["Condensed Matter Collaborations 2005 Network"]
Out[]=
Graph
Summary properties:
In[]:=
ResourceData["Condensed Matter Collaborations 2005 Network",All]["Summary"]
Out[]=
Name | Condensed Matter Collaborations 2005 |
VertexCount | 40421 |
EdgeCount | 175692 |
Description | Updated weighted network of collaborations between scientists posting preprints |
ByteCount |
Basic Applications
Basic Applications
Pick the author with the most collaborations:
In[]:=
g=ResourceData["Condensed Matter Collaborations 2005 Network"];
In[]:=
author=First[MaximalBy[VertexList[g],VertexDegree[g,#]&]]
Out[]=
1887
Visualize the network around the author with the most collaborations :
In[]:=
NeighborhoodGraphg,author,
Out[]=