%I#48 2023年1月14日08:44:52

%S 0,2,4,6,8,10,11,12,14,16,18,22,33,44,55,66,77,88,99101110121132，

%电话：1411431541611651761811871982012022222241242261262，

%电话：28128230230232334234336236332383403404423424443

%N至少一个k的形式k+反向（k）的数字。

%C来自Avik Roy（Avik_3.1416（AT）yahoo.co.in），2009年2月2日：（开始）

%C任意（k+1）-数字m可以表示为

%C m=总和{i=0..k}（ai*10^i）。

%C反向（m）=和{i=0..k}（ai*10^（k-i））。

%C m+反向（m）=和{i=0..k}（ai*（10^i+10^（k-i）））。

%C最后一个公式可以产生这个序列的所有项；术语的顺序由人工智能的顺序明确确定（可能无法避免重复术语）。（结束）

%H T.D.Noe，n的表格，n=0..1000的a（n）</a>

%H<a href=“/index/Res#RAA”>为与反转和加法相关的序列索引条目</a>

%e0属于序列，因为0+0=0；

%e33属于12+21=33的序列。

%t M=10^3；digrev[n_]：=整数位数[n]//反向//起始位数；清除[b]；b[_]=0；对于[n=1，n<=M，n++，t1=n+digrev[n]；如果[t1<=M，b[t1]=b[t1]+1]]；A067030=加入[｛0｝，收割[对于[n=1，n<=M，n++，如果[b[n]>=1，播种[n]]][[2，1]]]（*_Jean-François Alcover_，2016年10月1日，在A072040*中的_n.J.A.斯隆的Maple代码之后）

%t最大值=1000；l=常量数组[0，最大值]；Do[s=n+整数反转@n; 如果[s<=max，l[[s]]++]，{n，max}]；扁平@{0，位置[l，_？（#！=0&）]}（*Hans Rudolf Widmer_，2022年12月25日*）

%o（ARIBAS）

%o函数Reverse（n：整数）：整数；var i：整数；str，rev：字符串；

%o开始str:=itoa（n）；版本：=“”；

%o对于i:=0到长度（str）-1做rev:=concat（str[i]，rev）；结束；

%o返回atoi（rev）；反向结束；

%o函数A067030（a，b:整数）；var k，n：整数；

%o从n:=a到bdok:=0开始；而k≤n do

%o如果n=k+反向（k），则写入（n，“，”）；断裂；else inc（k）；结束；

%o结束；结束；A067030端；

%o A067030（0500）（*由Klaus Brockhaus修订，2011年5月4日*）。

%o（岩浆）A067030:=功能（a，b）；S： =[]；对于[a..b]中的n，做k:=0；而k le n do如果n eq k+Seqint（反向（Intseq（k））），则追加（~S，n）；断裂；否则k+：=1；结束条件：；结束while；结束；返回S；端函数；A067030（0500）；//_Klaus Brockhaus，2011年5月4日

%o（Python）

%o def aupto（lim）：返回排序（如果t<=lim），则为（k+int（str（k）[：：-1]）范围内k的t设置（t））

%o打印（aupto（443））#_Michael S.Branicky_，2022年12月25日

%Y参见A033865、A067031、A06703、A067003、A067024、A056964。

%K碱基，简单，非n

%0、2

%A _Klaus Brockhaus，2001年12月29日