检验过的
经核准的
提出
编辑
更多姓名 澄清 和 更多条款 补充 从通过 阿米拉姆·埃尔达尔2020年3月12日
阿米拉姆·埃尔达尔:完成。
米歇尔·马库斯:也在这里?
a={};Do[m=2^素数[n]-1;k=除数[m][[-2]];If[PrimeQ[m],null,If[PrimeQ[k],AppendTo[a,1],AppedTo[a、0]],{n,1,50}];一(*)_阿图尔 雅辛斯基_ *)
a(n)=1,如果 这个最大的 适当的梅森复合除数A145097型(n) 是素数,在相反的情况下a(n)=0。
1,1,0,1, 1,0,0, 0, 1, 1,0, 0, 0,1,1,1,1,1, 0,1,1,1, 1,0,0,0, 1,0,0,0,0, 0,1,1, 0, 0, 1,0,0,0, 1,0,0,0, 1, 1,0, 1, 0, 1,0,0,0,0,0,0, 1,0,0,0,0, 1, 1,0,0,0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1,0,0,0,0, 1,0,0, 0, 0, 1, 0
Amiram Eldar,<a href=“/A145099型/b145099.txt“>n表,n=1..191时为a(n)</a>
更多术语来自阿米拉姆·埃尔达尔2020年3月12日
a={};Do[m=2^素数[n]-1;k=除数[m][[-2]];If[PrimeQ[m],null,If[PrimeQ[k],AppendTo[a,1],AppedTo[a、0]],{n,1,50}];一(*(*)_阿图尔·贾辛斯基*)_ *)
囊性纤维变性.A065341号,135975英镑,A135980型,A145097型,A145098型A136031号.
_阿图尔·贾辛斯基(图形软件包(在)csl公司.pl公司),_,2008年10月1日
OEIS服务器: https://oeis.org/edit/global/339