A046497-OEIS公司

A046497号

回文可以表示为两个连续回文的总和。

三

1, 3, 5, 7, 9, 11, 33, 55, 77, 99, 121, 212, 232, 252, 272, 292, 393, 414, 434, 454, 474, 494, 595, 616, 636, 656, 676, 696, 797, 818, 838, 858, 878, 898, 999, 2112, 2332, 2552, 2772, 2992, 3993, 4114, 4334, 4554, 4774, 4994, 5995, 6116, 6336, 6556, 6776, 6996, 7997, 8118, 8338, 8558 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`1,2`
	评论	`包含所有回文，其中中间的数字是奇数（如果数字的数目是奇数），中间的两个数字是奇数（如果位数是偶数），所有其他数字是偶数；还有回文，其中第一个和最后一个数字是奇数（但不是1），所有其他数字都是9-罗伯特·伊斯雷尔，2018年11月12日`
	链接	`罗伯特·伊斯雷尔，n=1..10000时的n，a（n）表` `P.De Geest，世界！数字的总数`
	例子	`999 = 494 + 505.`
	MAPLE公司	`ispali:=proc（n）局部L；` `五十： =换算（n，基数，10）；` `L=列表工具：-反向（L）` `结束进程：` `digrev:=程序（n）局部L；` `五十： =换算（n，基数，10）；` `加（L[-i]10^（i-1），i=1..nops（L））` `结束进程：` `N： =5；好友：=$0.9:` `对于从2到N的d do` `q： =p；` `如果d:：即使如此` `m： =d/2；` `帕尔斯：=帕尔斯，seq（n10^m+digrev（n），n=10^（m-1）。。10平方米-1）；` `其他的` `m： =（d-1）/2；` `帕尔斯：=帕尔斯，seq（seq（n10^（m+1）+y10^m+digrev（n），y=0..9），n=10^。。10平方米-1）；` `fi（菲涅耳）` `日期：` `好友：=[好友]：` `选择（ispali，Pals[1..-2]+Pals[2..-1]）#罗伯特·伊斯雷尔2018年11月12日`
	数学	`palQ[n_]：=反向[x=整数位数[n]]==x；选择[Total/@分区[Select[Range[3500]，palQ]，2，1]，pal Q](贾扬达·巴苏2013年6月26日）` `nextPalindrome[n_]：=模块[{k=n+1}，While[！PalindromeQ[k]，k++]；k] ；s={}；Do[If[PalindromeQ[n]，sum=n+nextPalindrome[n]；如果[PalindromeQ[sum]，AppendTo[s，sum]]，{n，0，10000}]；秒(阿米拉姆·埃尔达尔2018年11月10日）` `选择[Total/@Partition[Select[Range[0，5000]，PalindromeQ]，2，1]，PalindromeQ](哈维·P·戴尔，2021年9月24日）`
	交叉参考	`囊性纤维变性。A002113号.` `上下文中的序列：A092361号 A029950型 A061507号A061512号 A356750型 A083964号` `相邻序列：A046494号 A046495美元 A046496号A046498号 A046499号 A046500型`
	关键词	`非n，基础`
	作者	`帕特里克·德·格斯特1998年9月15日`
	扩展	`a（1）=1由插入阿洛伊斯·海因茨2018年11月13日`
	状态	`经核准的`