借鉴https://www.geogebra.org/m/huf2Ygzt[br] 2022年2月6日 - 下午6:30[br]研习自： [url=https://www.geogebra.org/u/aileen]Aileen[/url] — 2014年6月17日 - 上午11:02 的 [url=https://www.geogebra.org/m/huf2Ygzt]三角形迭代 – GeoGebra[/url][br][br][br][br]https://tieba.baidu.com/p/7298788205 法向量法

初始图形[br]poly1=多边形((0,0),(b,0),n)[br]l1={顶点(poly1)}[br][br]顶点,定比分点[br]m1=迭代列表(序列([b]a 元素(p,i)+(1-a) [/b]如果(i≟n,元素(p,1),元素(p,i+1)),i,1,n),p,{l1},m)[br][br]多边形[br]l2=序列(多边形(元素(m1,i)),i,1,长度(m1))[br][br]方法2[br]l3=迭代列表(多边形(序列(描点(p,i*0.25+((a)/(n))),i,0,n-1)),p,{poly1},m)

20260718 [br]进阶修改[br]任意多边形poly2[br][br]上述方法1只需修改对变形顶点列表即可，适合任意多边形[br]l1={顶点(poly2)}[br][br]方法2：只需修改红色部分，适合任意多边形，螺旋与上述相反（），a是增量不是比值[br]l23=迭代列表(多边形(序列([b]描点(p,[color=#ff0000]a+((i-1)/(n))[/color]),[/b]i,1,[color=#ff0000]n[/color])),p,{[b][color=#ff0000]poly2[/color][/b]},m)[br][br][br][br][br][br][br]