%I#22 2018年4月9日09:29:52
%S 2,0,2,1,1,2,1,1,1,1,2,2,1,2,1,2,1,1,1,1,1,1,1,1,2,1,2,2,1,1,2,1,1,2,1,
%温度2,2,2,1,1,1,2,1,2,2,2,2,1
%梅森素数2^p-1的指数p(参见A000043)读取模3。
%F a(n)=A010872(A000043(n))_米歇尔·马库斯(Michel Marcus),2014年8月12日
%t数组[Mod[MersennePrimeExponent@#,3]&,45](*_Michael De Vlieger_,2018年4月7日*)
%o(PARI)表示素数(p=1,1e3,if(isprime(2^p-1),print1(p%3,“,”))\\_Felix Fröhlich_,2014年8月12日
%Y参考A010872(n mod 3),A126044-A126059。
%K nonn公司
%O 1,1
%A _Artur Jasinski,2006年12月17日
%E a(45)-a(47),来自_Ivan Panchenko,2018年4月8日
|