登录
数字和严格递增的平方。
9

%I#16 2019年2月10日01:10:11

%第1、4、9、4916928918493968892788969697969499849698896页,

%电话:2778889499969696996199987844668988966699889798669,

%电话:2777888894789968769889961719889559997788979989769698988769179999978896

%数字和严格递增的N平方。

%H Giovanni Resta,n表,n=1..80的a(n)(Kevin Buzzard的前57个术语)

%p A007953:=proc(n)选项记住:return add(d,d=convert(n,base,10)):end:A068947:=proc_纳撒尼尔·约翰斯顿,2011年5月4日

%t={};s=0;Do[If[(x=Total[IntegerDigits[y=n^2])>s,AppendTo[t,y];s=x],{n,150000}];t(*Jayanta Basu,2013年8月6日*)

%Y参见A068947、A068948、A06894、A068950、A068952、A069324。

%K基,nonn

%O 1,2号机组

%A _Amarnath Murthy,2002年3月6日

%E来自Francois Jooste(phukraut(AT)hotmail.com)的更多术语,2002年3月15日