Wolfram 语言函数网络
用新增的 NestGraph 函数生成 Wolfram 语言一个“附近”函数的网络.
In[1]:=
![Click for copyable input](assets.zh/network-of-wolfram-language-functions/In_6.png)
func = WolframLanguageData[#,
EntityProperty["WolframLanguageSymbol", "RelatedSymbols"]] &;
In[2]:=
![Click for copyable input](assets.zh/network-of-wolfram-language-functions/In_7.png)
g = NestGraph[func, Entity["WolframLanguageSymbol", "Nest"], 2,
VertexLabels -> "Name", VertexLabelStyle -> 6]
Out[2]=
![](assets.zh/network-of-wolfram-language-functions/O_6.png)
显示社区.
In[3]:=
![Click for copyable input](assets.zh/network-of-wolfram-language-functions/In_8.png)
CommunityGraphPlot[g]
Out[3]=
![](assets.zh/network-of-wolfram-language-functions/O_7.png)