Wolfram
Mathematica
8의 신기능: 그래프 및 네트워크 모델링
◄
이전
|
다음
►
응용 분야
엄선된 그래프 컬랙션
Mathematica
8은 엄선된 그래프와 네트워크의 광범위한 컬렉션이 포함되어 있습니다.
GraphData
에는 다양한 그래프가 내장되어 있으며
PolyhedronData
에는 골격과 넷 그래프가 내장되어 있어, 입력으로 혹은 프로그램에 포함하여 바로 사용할 수 있습니다.
In[1]:=
X
skeletons = Partition[ PolyhedronData[#, "SkeletonGraph"] & /@ PolyhedronData["Archimedean"], 4];
In[2]:=
X
nets = Partition[ PolyhedronData[#, "NetGraph"] & /@ Take[PolyhedronData["Archimedean"], 8], 4];
In[3]:=
X
GraphicsGrid[Join[skeletons, nets], ImageSize -> 500]
Out[3]=