Visualization Notes
Thursday, December 26, 2019
Graph Drawing
GPG[g_,col_]:=GraphPlot[GraphData[g],VertexSize->0,
PlotStyle->RGBColor[col],ImageSize->600];
Show[GPG["HundredTwentyCellGraph","slategray"],
GPG["SixHundredCellGraph","steelblue"]]
No comments:
Post a Comment
‹
›
Home
View web version
No comments:
Post a Comment