%I#47 2022年11月6日07:48:57

%S 1,4,9,16,25,36,49,64,81,82,85,90,97106117130145162166171，

%电话：17818719821122624324247252592592682792307324325328，

%电话：333340349360373388405409414421430441454469486487

%N设m=极好的Demlo数A002477（N）；a（n）=m的位数之和。

%C记录A003132中的值：a（n）=A003132（A051885（n））。-_Reinhard Zumkeller，2011年7月10日

%H Robert Israel，n的表，n=1..10000的a（n）</a>

%H Eric Weisstein的数学世界，<a href=“http://mathworld.wolfram.com/DemloNumber.html“>Demlo编号</a>

%H<a href=“/index/Rec#order_10”>带常系数线性递归的索引条目</a>，签名（1,0,0,00,0,1，-1）。

%F a（n）=A007953（A002477（n））。

%F a（n）=平方（A080150（n））。

%F a（n）=（9^2）*（n/9-{n/9}+{n/9{^2）=81*（floor（n/9）+{n/9}^2），其中符号{n}表示n.-Enrique Pérez Herrero_的分数部分，2009年11月22日

%F a（9*n+k）=81*n+k^2，k在0到9的范围内_恩里克·佩雷斯·埃雷罗，2022年11月5日

%F经验公式：x*（17*x^8+15*x^7+13*x^6+11*x^5+9*x^4+7*x^3+5*x^2+3*x+1）/（（x-1）^2*（x^2+x+1）*（x*6+x^3+1））_科林·巴克（Colin Barker），2014年3月5日

%F经验性g.F.确认。-_罗伯特·伊斯雷尔，2019年8月5日

%p f：=n->9*n-81*压裂（1/9*n）+81*压裂

%p映射（f，[1..100]美元）；#_罗伯特·伊斯雷尔，2019年8月5日

%t（*直接计数*）

%t重新命名[n_]：=（-1+10^n）/9；A080151[n_]：=加号@@IntegerDigits[Repunit[n]^2]；

%t（*根据公式*）

%t A080151[n_]：=（9^2）*（n/9-分数部分[n/9]+分数部分[n/9]^2）

%t（*或替代*）

%t A080151[n_]：=81*（楼层[n/9]+分数部分[n/9]^2）（*_Enrique Pérez Herrero_，2009年11月22日*）

%o（Haskell）a n=（div n 9）*81+（mod n 9）^2

%o A080151=地图a[1..]\\_谢尔尼·纳达夫，2014年3月6日

%o（PARI）矢量（100，n，（n9）*81+（n%9）^2）\\科林·巴克，2014年3月5日

%Y参考A080150、A002477、A080160、A080161、A080162。

%K nonn，基础，简单

%O 1,2号机组

%A _Eric W.Weisstein，2003年1月31日