%I#22 2019年1月1日20:16:42

%S 0,1,2,1,2,1,2,2,3,4,1,1,2,3,2,2,32,2,33,2,3,1,3,3,4,4,5,5,1,2,2,2,2,2,3,3，

%T（T）3,4,4,5,2,3,2,2,3,3,4,1,5,3,3,1,4,3,5,4,4（T）4,4,15,5,5,15,6,6（T），

%U 6,6,6,1,1,2,3,4,2,3,4,1,3,5,3,2,3,1,3,1,4,3,3,6,4,4,4],4,5,5,6,6，6,2,34,2,2

%N以阶乘为基数写入的最大数字N^2。

%C猜想：lim_{n->infinity}a（n）=infinity。如果为true，则收敛速度非常慢，因为a（1183893）=1。序列当然是无界的，因为对于n>=4，n*n之间总是有一个平方！和（n+1）！。

%H Alois P.Heinz，n的表格，n=0..20954的a（n）</a>

%e 4^2=16=2*6+2*2=220（阶乘基数），因此a（4）=最大值（2,2,0）=2。

%p b:=proc（n，i）局部r`如果`（n<i，n，

%p最大值（b（iquo（n，i，'r'），i+1），r））

%p结束：

%pa:=n->b（n^2，2）：

%p序列（a（n），n=0..188）；#_Alois P.Heinz，2018年3月28日

%t块[{nn=105^2，r}，r=Reverse@Most@NestWhileList[#+1&，2，#！<nn&]；数组[Max@IntegerDigits[#^2，MixedRadius@r]&，Sqrt@nn，0]]（*_Michael De Vlieger_，2019年1月1日*）

%o（PARI）f（n，p=2）=如果（n<p，n，f（n\p，p+1）*10+n%p）；\\A007623号

%o a（n）=我的（dfb=数字（f（n^2）））；if（#dfb，vecmax（dfb），0）；\\_米歇尔·马库斯，2018年3月28日

%Y参见A007623、A108731、A301872。

%该序列中1的Y指数为A014597。

%K easy、nonn、base

%0、3

%A _弗兰克林·T·亚当斯-沃特斯，2005年8月25日