%I#61 2023年5月17日20:55:32
%S 0,2,4,6,8,10,12,14,16,18,11,13,15,17,19,21,23,25,27,29,22,24,26,28,
%电话:30,32,34,36,38,40,33,35,37,39,41,43,45,47,49,51,44,46,48,50,52,54,56,
%U 58、60、62、55、57、59、61、63、65、67、69、71、73、66、68、70、72、74、76、78、80、82、84、77
%N a(N)=N+N的数字之和。
%C a(n)=A248110(n,A007953(n))_Reinhard Zumkeller,2014年10月1日
%H Harry J.Smith和N.J.A.Sloane,N的表,A(N)表示N=0..100000
%H<a href=“/index/Coi#Colombian”>哥伦比亚或自身编号和相关序列的索引条目</a>
%F a(n)=n+A007953(n)。
%F a(n)=A160939(n+1)-1.-_Filip Zaludek,2016年10月26日
%e a(34)=34+3+4=41,a(40)=40+4=44。
%p with(numtheory):对于从1到100的n,执行a:=转换(n,base,10):
%p c:=添加(a[i],i=1..nops(a)):打印f(`%d,`,n+c);日期:
%p A062028:=n->n+添加(i,i=转换(n,基数,10))#_M.F.Hasler_,2018年11月8日
%t表格[n+Total[Integer Digits[n]],{n,0,100}]
%o(PARI)和D(x)={s=0;而(x>9,s=s+x-10*(x\10);x\=10);s+x}
%o表示(n=0,1000,写入(“b062028.txt”,n,“”,n+总和D(n)))
%o(PARI)A062028(n)=n+总和(n)\\ M.F.Hasler_,2015年7月19日
%o(Haskell)a062028 n=a007953 n+n--Reinhard Zumkeller,2013年10月11日
%o(Python)
%o定义a(n):返回n+总和(map(int,str(n)))
%o打印([a(n)代表范围(71)内的n)]#_Michael S.Branicky_,2023年1月9日
%Y参见A007953、A006378、A048521、A107740、A066568、A064806、A176995(范围)、A003052、A230093、A248110。
%Y指数:A047791(素数)、A107743(复合物)、A066564(正方形)、A084661(立方体)。
%Y迭代次数:A004207(开始=1)、A016052(开始=3)、A007618(开始=5)、A006507(开始=7)、A0160096(开始=9)。
%K nonn,基础,简单
%0、2
%A _Amarnath Murthy,2001年6月2日
%E更多条款摘自2001年6月5日的_Vladeta Jovovic
|