检验过的

经核准的

提出

检验过的

编辑

提出

米歇尔·马库斯：好的，谢谢

0, 1, 3, 2, 4, 6, 5, 7, 13, 15, 8, 12, 14, 16, 26, 9, 11, 17, 19, 25, 27, 10, 18, 20, 22, 24, 28, 30, 21, 23, 29, 31, 53, 55, 61, 63, 32, 50, 52, 54, 56, 60, 62, 64, 106, 33, 35, 49, 51, 57, 59, 65, 67, 105, 107, 34, 36, 38, 48, 58, 66, 68, 70, 104, 108, 110, 37, 39, 45,47,69,71,77,79,101,103,109,111

提出

编辑

凯文·莱德：是的，从b文件中复制出来（所有这些我都同意一些备用折纸曲线代码：）。

编辑

提出

米歇尔·马库斯：您能再添加9个术语以获得完整的最后一行三角形吗

带有[{n=216}，TakeWhile[#，Length@#2==#1&@@#&][[All，-1]]&@Transpose@{Keys@#，Lookup[#，Keys@#]}&[PositionIndex@Accumulate@Array[1-2 Mod[Length[FixedPointList[BitAnd[#，#-1]&，BitAnd[#，Quotient[#，2]]]，2]&(2^] &,n个)^4^2，0]-1]]//展平(*迈克尔·德弗利格2020年1月25日*）

提出

编辑

编辑

提出

使用[{n=2}，TakeWhile[#，Length@#2==#1&@@#&][[All，-1]]&@Transpose@{Keys@#，Lookup[#，Keys@#]}&[PositionIndex@Accumulate@@阵列[1-2 国防部[长度[固定点列表[比特与[#, # -1] &,比特与[#,商[#,2]]]]，2] &, (2^n个)^4,0] -1]] //压扁(* _迈克尔 扩散系数 弗利格_,简 25 2020*)

数组[1-2 Mod[Length[FixedPointList[BitAnd[#，#-1]&，BitAnd[#，商[#，2]]]，2]&，（2^n）^4，0]-1]//展平(*迈克尔·德弗利格2020年1月25日*）

使用[{n=2}，TakeWhile[#，Length@#2==#1&@@#&][[All，-1]]&@Transpose@{Keys@#，Lookup[#，Keys@#]}&[PositionIndex@Accumulate@

数组[1-2 Mod[Length[FixedPointList[BitAnd[#，#-1]&，BitAnd[#，商[#，2]]]，2]&，（2^n）^4，0]-1]//展平(*迈克尔·德弗利格2020年1月25日*）

提出

编辑

编辑

提出