第页 = 黄金比率; f【n】 := (f)[n个]=斐波那契[n];
克[i_, [j_] := f【j】 + 1] *楼层[i*第页黄金比率] + (i) - 1) f[j];
t吨=台模[表[g[i, j] , {i, 1, 10500}, {j, 1, 5100}]];
(* 地图[#[[2]]-#[[1]]&,大多数[收割[嵌套WhileList[#+1&,1,长度[母猪[第一个位置[吨=A035513号, 这个 威索夫 阵列 ,#]]]>1&]][[2]][[1]]]] (* _彼得 J型. C类. 摩西_, 二月 09 2023 *)
a=扁平[表[如果[g[i,j]==n,j-i,{}],{n,80},{i,40},},[j,40}]]
(*a)=A191360型*)