登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 


提示
（来自的问候整数序列在线百科全书!)
A065207号
需要两个“反转和添加”步骤才能到达回文。
4
19, 28, 37, 39, 46, 48, 49, 57, 58, 64, 67, 73, 75, 76, 82, 84, 85, 91, 93, 94, 109, 119, 129, 139, 149, 150, 152, 153, 154, 159, 160, 162, 163, 169, 170, 172, 173, 179, 189, 208, 218, 219, 228, 229, 238, 239, 248, 250, 251, 253, 258, 259, 260, 261, 268, 269
(列表;图表;参考;听;历史;文本;内部格式)
抵消
1,1
评论
步骤数从0开始，因此回文（参见。A002113号)被排除在外。
链接
Michael S.Branicky，n=1..10000时的n，a（n）表（Harry J.Smith第1..1000条）
与反转和添加相关的序列的索引项！
数学
trasQ[n_]：=长度[NestWhileList[IntegerReverse[#]+#&，n！回文Q[#]&，1，5]]==3；选择[Range[300]，trasQ](*哈维·P·戴尔2022年4月13日*）
黄体脂酮素
（ARIBAS）：revadd_steps（2，58）。有关函数revadd_steps的定义，请参见A065206号.
（平价）
Rev（x）={局部（d，r=0）；while（x>0，d=x-10*（x\10）；x\=10；r=r*10+d）；return（r）}
数字输入（x）={local（d）；如果（x==0，返回（1））；d=1+log（x）\log（10）；如果是（10^d==x，d++，如果（10^（d-1）>x，d--））；返回（d）}
佩林（x）={局部（d，e，f，i，t，y）；如果（x==0，返回（1））；y=x；d=digitsIn（x）；t=10^（d-1）；对于（i=1，d\2，f=y-10*（y\10）；y\=10；e=x\t；x-=t*e；t/=10；如果（e！=f，返回（0）））；返回（1
{n=0；对于（m=0，10^9，p=m；b=1；对于（i=1，2，if（佩林（p），b=0；中断）；p=Rev（p）+p）；如果（b&&佩林（p），则写入（“b065207.txt”，n++，“”，m）；if（n==1000，return））}\\哈里·史密斯2009年10月14日
（Python）
定义ra（n）：s=str（n）；返回int（s）+int（s[：：-1]）
定义ispal（n）：s=str（n）；返回s==s[：：-1]
定义缺陷（极限）：
alst=[]
对于范围内的k（极限+1）：
如果ispal（k）：继续
k2=ra（k）
如果ispal（k2）：继续
如果ispal（ra（k2））：alst.append（k）
返回alst
打印（aupto（269））#迈克尔·布拉尼基2021年5月6日
交叉参考
囊性纤维变性。A002113号,A015977号,A065206号.
上下文中的顺序：A173639号 A091448号 A067777号*A084364号 A094677号 A052224美元
相邻序列：A065204号 A065205号 A065206年*A065208号 A065209号 A065210型
关键词
非n,基础
作者
克劳斯·布罗克斯2001年10月21日
扩展
偏移量由0更改为1哈里·史密斯2009年10月14日
状态
经核准的

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间：2024年9月21日02:58 EDT。包含376079个序列。（在oeis4上运行。）