20260714 修改自:[url=https://www.geogebra.org/u/ansheng]赵林[/url] — 2021年3月9日 - 下午8:17 的 [url=https://www.geogebra.org/m/frth2gbp]点阵新作 – GeoGebra[/url][br]含各种自定义工具[br]
A=描点(y轴)[br]B=(-1,1)[br]C=描点(x轴)[br]赋值(A,(0,1))[br]赋值(C,(-1,0))[br][br]#利用ABC三点画L型折线,通过(-1)^(i-1)调节旋转,交替型,偶数旋转,奇数不旋转(可使收尾相连),通过i缩放,[br]l4=序列(平移(折线(位似(A,[color=#ff0000][b](-1)^(i-1)[/b] [/color]i),位似(B,(-1)^(i-1) i),位似(C,(-1)^(i-1) i)),向量(floor(((i)/(2))) (-1)^(floor(i-1)) (1,-1))),i,1,10)[br]l3=扁平列表(映射(序列(描点(p,((i)/(p))),i,0,p),p,l4))[br][br]f=折线(l3)[br][br][br]n=滑动条(1,11,1)[br]赋值(n,1)[br]m=滑动条(1,120,1)[br]赋值(m,1)[br][br]D=l3(m)[br]g=l4(n)
[url=https://www.geogebra.org/m/agskugua]点阵 – GeoGebra[/url] 作者:[url=https://www.geogebra.org/u/ansheng]赵林[/url][br][br][br]l1=序列(多边形((0,1)+i (-1,1),(0,0)-i,4),i,0,10)[br]l2=映射(周长(p),p,l1)[br]l3=扁平列表(映射(序列(描点(p,((i)/(q))),i,1,q),p,l1,q,l2))[br]j=折线(l3)