%我#15 2022年9月8日08:45:48
%S 1,1,1,0,1,1,0,0,1,1,1,0,0,1,11,0,0,1,1,1,1,0,1,0,1,0,1,0,
%温度1,0,1,0,1,0,0,0,0,1,1,0,0,1,1,0,01,1,0,1,1,1,1,0,1,0,1,
%U 0,1,0,1,1,0,0,1,1,0,0,0,1,0,1,0,0,1,0-0,01,0,1,1,1,0
%如果6n+1是素数,则N a(N)=1。
%特征函数的索引项</a>
%e a(3)=1,因为6*3+1是素数;
%e a(4)=0,因为6*4+1是复合的。
%t如果[PrimeQ[6#+1],1,0]和/@Range[120](*哈维·P·戴尔,2012年4月3日*)
%o(PARI)a(n)=i素数(6*n+1);\\_米歇尔·马库斯,2019年1月19日
%o(Magma)[IsPrime(6*n+1)select 1 else 0:n in[1..105]];//_Marius A.Burtea_,2019年10月6日
%Y参考A024899、A167020、A132350。对于n<14,a(n)=A132350(n)。
%K nonn公司
%O 1,1号机组
%A_Washington Bomfim,2009年10月27日