A118031-OEIS公司

A118031号

回文数倒数之和的十进制扩展A002113号.

3, 3, 7, 0, 2, 8, 3, 2, 5, 9, 4, 9, 7, 3, 7, 3, 3, 2, 0, 4, 9, 2, 1, 5, 7, 2, 9, 8, 5, 0, 5, 5, 3, 1, 1, 2, 3, 0, 7, 1, 4, 5, 7, 7, 7, 9, 4, 5, 2, 7, 7, 8, 4, 9, 1, 3, 3, 5, 0, 6, 8, 9, 2, 5, 9, 8, 2, 5, 1, 9, 7, 6, 0, 3, 4, 9, 4, 7, 6, 7, 5, 8, 9, 7, 0, 3, 0, 1 (列表;常数;图表;参考;听;历史;文本;内部格式)

	抵消	`1,1`
	评论	`所有回文数<10^8的和为3.37000183240……使用韦恩的ε方法外推得出的值接近3.37018-埃里克·韦斯特因2006年5月14日`
	链接	`约瑟夫·迈尔斯，n=1..1001时的n，a（n）表` `约瑟夫·迈尔斯，多项式时间算法.` `迈克尔·佩恩，这个级数收敛吗？？，YouTube视频，2021年。` `拉多万·波切克，具有非零整数根的二次多项式的倒数级数和的公式《作为现代应用数学基础的算法，模糊性和软计算研究》丛书（STUDFUZZ，第404卷）Springer（2021），363-382。` `埃里克·魏斯坦的数学世界，回文数字.`
	配方奶粉	`a（n）=和{回文p>0}1/p。` `a（n）=和{n>=2}1/A002113号（n） ●●●●。`
	例子	`3.3702832594973733204921572985...`
	数学	NextPalindrome[n_]：=块[{l=Floor[Log[10，n]+1]，idn=IntegerDigits@n}，如果[Union@idn=={9}，Return[2]，如果[l<2，Return[n+1]，如果[FromDigits[Reverse[Take[idn，Ceiling[l/2]]]>FromDiges[Take[idn，-Ciling[I/2]]，FromDigs[Join[Take[2，Ceiling[l/2]]，Reverse[Take[id，Floor[l/2]]]]]，idfhn=FromDigits[Take[idn，Ceiling[l/2]]]+1；idp=FromDigits[Join[IntegerDigits@idfhn，Drop[Reverse[Integer Digits@idfhn]，Mod[l，2]]]]]]；pal=1；sm=0；做[While[pal<10^n+1，sm=n[sm+1/pal，128]；pal=NextPalindrome@pal]；打印[{n，sm}]，{n，0，17}](罗伯特·威尔逊v2010年10月20日）
	交叉参考	`囊性纤维变性。A002113号.` `类似序列：A118064号,A194097号,A244162号.` `上下文中的序列：A366820型 A066358号 A261295型A335726型 A240504型 A338775型` `相邻序列：A118028号 A118029号 A118030型A118032号 A118033号 A118034号`
	关键词	`欺骗,基础,非n`
	作者	`马丁·瑞诺2006年5月11日`
	扩展	`更正人埃里克·韦斯特因2006年5月14日` `更正和扩展人罗伯特·威尔逊v2010年10月20日` `更正和扩展人约瑟夫·迈尔斯2014年6月26日`
	状态	`经核准的`