Basic Examples
Basic Examples
Retrieve the graph:
In[]:=
ResourceData["Coauthorships in Network Science Network"]
Out[]=
Summary properties:
In[]:=
ResourceData["Coauthorships in Network Science Network",All]["Summary"]
Out[]=
Name | Coauthorships in Network Science Network |
VertexCount | 1589 |
EdgeCount | 2742 |
Description | Weighted network of coauthorships between scientists working on network science |
ByteCount |
Basic Applications
Basic Applications
Pick the author with the most collaborations:
In[]:=
g=ResourceData["Coauthorships in Network Science Network"];
In[]:=
author=First[MaximalBy[VertexList[g],VertexDegree[g,#]&]]
Out[]=
A. Barabasi
Visualize the network around the author with the most collaborations:
In[]:=
NeighborhoodGraphg,author,
Out[]=