|
| |
| |
|
|
|
0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 232, 343, 454, 565, 676, 787, 898, 909, 26962, 38183, 40504, 49294, 52825, 63936, 75157, 2956592, 2968692, 3262623, 3274723, 3286823, 3298923, 3360633, 3372733, 4348434, 4410144, 4422244, 4581854
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
偏移
|
1,3
|
|
|
评论
|
前79个术语的小数位数都是奇数。是否有小数位数为偶数的术语-罗伯特·伊斯雷尔2014年11月23日
|
|
|
链接
|
Ray Chandler和Robert G.Wilson v，n=1..79时的n，a（n）表，a（66）-a（76），来自Ray Chandler，2014年10月31日
|
|
|
MAPLE公司
|
N： =11:#以获取最多N个十进制数字的所有项
qpali：=proc（k，b）局部L；五十： =换算（k，基数，b）；如果L=ListTools:-Reverse（L），则k else NULL fi结束进程：
digrev:=proc（k，b）局部L，n；五十： =换算（k，基数，b）；n： =nops（L）；加（L[i]*b^（n-i），i=1..n）；结束进程：
Res:=$0..9:
对于从2到N的d do
如果d:：即使如此
m： =d/2；
结果：=结果，序列（qpali（n*10^m+digrev（n，10），11），n=10^（m-1）。。10平方米-1）；
其他的
m： =（d-1）/2；
Res:=Res，seq（seq（qpali（n*10^（m+1）+y*10^m+digrev（n，10），11），y=0..9），n=10^（m-1）。。10^m-1）；
fi（菲涅耳）
日期：
|
|
|
数学
|
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，-Cilip[l/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]]]]]；palQ[n_Integer，base_Integer]：=块[{idn=IntegerDigits[n，base]}，idn==反转[idn]]；l={0}；a=0；Do[a=下一个回文[a]；如果[palQ[a，12]，AppendTo[l，a]]，{n，100000}]；我(*罗伯特·威尔逊v2004年9月30日*）
b1=10；b2=11；lst={}；Do[d1=整数位数[n，b1]；d2=整数位数[n，b2]；如果[d1=Reverse[d1]&&d2=Reverse[d2]，AppendTo[lst，n]]，{n，0100000}]；第一次(*文森佐·利班迪2014年11月23日*）
选择[范围[0，10^5]，
回文Q[#]&#==整数反转[#，11]&](*罗伯特·普莱斯2019年11月9日*）
|
|
|
黄体脂酮素
|
（岩浆）[0..5000000]中的n：n | Intseq（n）eq反向//文森佐·利班迪2014年11月23日
|
|
|
交叉参考
|
囊性纤维变性。A007632号,A007633号,A029961号,A029962号,A029963号,A029964号,A029804号,A029965号,A029967美元,A029968号,A029969号,A029970型,A029731号,A097855号,A099165号.
|
|
|
关键词
|
非n,基础
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
