OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A210665型 第n个半素数的最小半素数除法数字反转,如果没有这样的因子,则为0。 1
4, 6, 9, 0, 0, 51, 4, 22, 4, 62, 33, 0, 0, 0, 93, 4, 94, 15, 55, 15, 85, 26, 4, 4, 0, 77, 4, 58, 4, 6, 0, 39, 49, 0, 0, 111, 511, 0, 0, 121, 221, 321, 921, 0, 0, 141, 0, 341, 0, 0, 551, 851, 951, 161, 0, 961, 771, 871, 381, 581, 781, 0, 6, 202, 302, 502, 14 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,1
链接
阿洛伊斯·海因茨,n=1..10000时的n,a(n)表
公式
a(n)=210615元(A210616型(n) )。
例子
a(4)=0,因为第四个半素数是10,而R(10)=1,它不能被任何半素数整除。
a(6)=51,因为第六个半素数是15,而R(15)=51本身就是半素数。
a(7)=4,因为第7个半素数是21,R(21)=12,并且4是12的最小半素数除数。
MAPLE公司
r: =proc(n)选项记忆;局部q;
`如果`(n<10,n,irem(n,10,'q')*10^(长度(n)-1)+r(q))
结束时间:
b: =proc(n)选项记忆;局部k;
如果n=0,则为0
b(n-1)+1中k的else
当isprime(k)或2<>加(i[2],i=ifactors(k)[2])时
做od;k个
fi(菲涅耳)
结束时间:
a: =proc(n)选项记忆;局部m,k;
m: =r(b(n));
对于k从4到m do
如果irem(m,k)=0且不是isprime(k)且
添加(i[2],i=ifactors(k)[2])=2,然后返回kfi
od;0
结束时间:
seq(a(n),n=1..100)#阿洛伊斯·海因茨2012年3月28日
交叉参考
囊性纤维变性。A001358号,A210615型,A210616型.
关键词
非n,基础,,容易的
作者
乔纳森·沃斯邮报2012年3月28日
状态
已批准

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

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

上次修改时间:美国东部夏令时2024年5月23日06:14。包含372760个序列。(在oeis4上运行。)