1、做一个正七边形:Graphics[{Green, RegularPolygon[7]}]
2、做一个正十七边形,并改变图形的样式:Graphics[辘腋粪梯{EdgeForm[Directive[Thick, Dashed, Blue]], Green, RegularPolygon[17]}]
3、画一个半径为6的正三角形和半径为2的六边形:Graphics[{Green, RegularPolygon[6, 3], Blue, RegularPolygon[2, 6]}]
4、从x轴转过1°,开始画一个正方形:Graphics[{Blue, RegularPolygon[{6, 1 Degree}, 4]}]这一点不太相符吧?感觉这个角度不同!
5、一稍僚敉视个精彩示例:With[{a = 10},Graphics[{Opacity[.1], Blue, Table[RegularPolygon[{((2 Sin[(a + 60) De爿讥旌护gree])/Sqrt[3])^(r - 1), a r Degree}, 6], {r, 0, 18}]}]]