回形数阵演示 iShow
20250422
修改自：朱亮 — 2017年8月22日 - 下午1:17 的 https://www.geogebra.org/m/X6ysEvmH
n=floor(sqrt(m+1))
##点阵
list1=扁平列表(序列(如果(余式(k,2)≟0,序列(描点(折线((0,k),(k,k),(k,0)),((i)/(2 k))),i,0,2 k),序列(描点(折线((k,0),(k,k),(0,k)),((i)/(2 k))),i,0,2 k)),k,0,n))
,
k=0，
k=1，折线((1,0),(1,1),(0,1))
k=2，折线((0,2),(2,2),(2,0))
k=3，折线((3,0),(3,3),(0,3))
k=4，折线((0,4),(4,4),(4,0))
...
##提取前m个
list5=提取(list1,1,m)
##箭头
list3=序列(向量(list1(i),list1(i+1)),i,1,m-1)
##序号数字文本
list4=序列(文本(i,list1(i)+(0.2,0.3)),i,1,m)
回字形也可以用这样的方法