|
| |
|
| A007633号 |
| 以3和10为底的回文。
（原M1164）
|
|
41
|
|
|
|
0, 1, 2, 4, 8, 121, 151, 212, 242, 484, 656, 757, 29092, 48884, 74647, 75457, 76267, 92929, 93739, 848848, 1521251, 2985892, 4022204, 4219124, 4251524, 4287824, 5737375, 7875787, 7949497, 27711772, 83155138, 112969211, 123464321
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
偏移
|
1,3
|
|
|
参考文献
|
J.Meeus，多元回文，J.Rec.Math。，18（第3期，1985-1986），168-173。
N.J.A.Sloane和Simon Plouffe，《整数序列百科全书》，学术出版社，1995年（包括该序列）。
|
|
|
链接
|
Patrick De Geest，n=1..65时的n，a（n）表（第1..41条来自Robert Israel，第42..63条来自Robot G.Wilson v）
M.R.Calandra先生，十进制和二进制表示法中都是回文的整数，J.Rec.数学。，18（1985年至1986年第1期），47。（带注释的扫描副本）[《数学评论》18.3（1985），第168-173页]
|
|
|
MAPLE公司
|
ND:=12；#获取所有小于等于ND十进制数字的术语
rev10:=proc（n）选项记忆；
版本10（楼层（n/10））+（n模块10）*10^ilog10（n）
结束；
对于从0到9的i，执行rev10（i）：=i od：
rev3:=proc（n）选项记忆；
版本3（楼层（n/3））+（n模块3）*3^ilog[3]（n）
结束；
对于从0到2的i，执行rev3（i）：=i od：
pali3:=n->rev3（n）=n；
计数：=1：
A[1]：=0：
对于从1到ND的d do
d1:=天花板（d/2）；
对于x从10^（d1-1）到10^d1-1 do
如果d:：即使是y:=x*10^d1+rev10（x）
否则y:=x*10^（d1-1）+rev10（楼层（x/10））；
fi；
如果pali3（y），则
count：=计数+1；
A[计数]：=y；
fi（菲涅耳）
日期：
日期：
|
|
|
数学
|
Do[a=整数位数[n]；b=整数位数[n，3]；如果[a==反转[a]&&b==反转[P]，打印[n]]，{n，0，10^9}]
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，4]，AppendTo[l，a]]，{n，100000}]；我(*罗伯特·威尔逊v2004年9月30日*）
pal3Q[n_]：=模块[｛idn3=整数位数[n，3]｝，idn3==反向[idn3]]；选择[Range[0，1235*10^5]，PalindromeQ[#]&&pal3Q[#]&]（*需要Mathematica版本10或更高版本*）(*哈维·P·戴尔2019年1月4日*）
选择[范围[0，10^5]，
回文Q[#]&#==整数反转[#，3]&](*罗伯特·普莱斯2019年11月9日*）
|
|
|
黄体脂酮素
|
（Python）
来自itertools导入链
从gmpy2导入数字
A007633号_列表=排序（如果数字（n，3）==数字（n、3）[：：-1]]）#柴华武2014年11月23日
|
|
|
交叉参考
|
囊性纤维变性。A007632号,A029961号,A029962号,A029963号,A029964号,A029804号,A029965号,A029966号,A029967美元,A029968号,A029969号,A029970型,A029731号,A097855号,A099165号.
|
|
|
关键词
|
非n,基础
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
