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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A317087飞机 素因子跨越素数的初始区间且素数重数序列是回文的数。 16
1、2、4、6、8、16、30、32、36、64、90、128、210、216、256、270、300、512、810、900、1024、1296、2048、2310、2430、2700、2940、3000、3150、4096、7290、7776、8100、8192、9000、11550、16384、21870、24300、27000、30000、30030、32768、41160、44100、46656、47250、48510 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
评论
3^m*10^k代表k,m>0是这个序列的项-柴华武2020年6月23日
链接
乔瓦尼·雷斯塔,n=1..10000时的n,a(n)表
维基百科,回文
例子
的行序列296150英镑由该序列项索引的开始:(1)、(11)、(21)、(111)、(1111)、。
数学
nrmpalQ[n_]:=使用[{f=If[n==1,{},FactorInteger[n]]},And[PrimePi/@Sort[First/@f]==Range[Length[f]],Reverse[Last/@f]==Last/@@f]];选择[范围[100],nrmpalQ]
小于等于10^20;pL[n_]:=块[{p=Prime@范围@n、 h=上限[n/2]},Take[p,h]反向@如果[n==2 h,Take[p,-h],Prepend[Take[p,1-h],1]]];ric[v_,p_]:=如果[p=={},附加到[L,v],块[{w=v},而[w<=upto,ric[w,Rest@p];w*=第一个@p]]];np=1;L={1};而[(b=Times@@Prime[Range@np])<=上限,ric[b,pL[np++]];排序[L](*乔瓦尼·雷斯塔2020年6月23日*)
黄体脂酮素
(Python)
来自sympy导入因子primepi
A317087飞机_列表=[1]
对于范围(1,10**5)中的n:
d=因子int(n)
k、 l=排序(d.keys()),len(d)
如果l>0且l==素数(max(d)):
对于范围(l//2)内的i:
如果d[k[i]]!=d[k[l-i-1]]:
打破
其他:
A317087飞机_列表.附加(n)#柴华武2020年6月23日
交叉参考
关键词
非n
作者
古斯·怀斯曼2018年7月21日
状态
已批准

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

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

上次修改时间:美国东部夏令时2024年3月29日05:28。包含371264个序列。(在oeis4上运行。)