%I#14 2015年8月18日13:25:48
%S 1,1,2,2,4,6,9,13,21,34,50,771211912924587271164029044650,
%电话:7429118691908730760494747997112922620982340347552722,
%电话:8986551461698238104138830796338935754916935173277123384538152151559329
%形式为i^2+j^4(A028916)<=2^N的素数,以重数计算。
%伊瓦涅克和弗里德兰德证明了i^2+j^4形式的素数存在无穷大。
%C用双重表示计数。如果不计算双精度数,则序列为A226498。
%e 2=1 ^2+1 ^4,5=2 ^2+1^4,17=4 ^2+1A ^4=1 ^ 2+2 ^4。。。,97=9^2+2^4=4^2+3^4等。
%t mx=2^40;lst={};执行[a=i^2+j^4;如果[PrimeQ[a],AppendTo[lst,a]],{i,Sqrt[mx]},{j,Sqrt[Sqrt[mx-i^2]}];表[Length@选择[lst,#<2^n&],{n,40}]
%Y参考A028916、A226495、A226487和A226498。
%K nonn公司
%氧1,3
%A Marek Wolf)和_Robert G.Wilson v_,2013年6月9日
|