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}]}]]
