%I#20 2015年5月8日15:15:49
%编号:7,13,971937691531304960731209724097956173793992998753,
%电话:187339729373174033294955161718426598363373152932481,
%电话:8802569996746982554317534404271629688842979595842748193343796114081304399449
%7阶斐波那契数列A060455中的N个素数。
%C a(22)太大,无法在此处显示。它有53位数字,是A060455中的第180个术语。
%H Robert G.Wilson v,n表,n=1..34的a(n)</a>
%t a={1,1,1,1,1,1,1};步骤=7;lst={};对于[n=step,n<=1000,n++,sum=Plus@@a;如果[PrimeQ[sum],AppendTo[lst,sum]];a=向左旋转[a];a[[7]]=总和];第一次
%t使用[{c=PadRight[{},7,1]},选择[LinearRecurrence[c,c,150],PrimeQ]](*_哈维·P·戴尔,2015年5月8日*)
%o(PARI)lista(nn)={gf=(-1+x^2+2*x^3+3*x^4+4*x^5+5*x^6)/(-1+x+x^2+x^3+x^4+x^5+x^6+x^7);对于(n=0,nn,if(isprime(p=polcoeff(gf+o(x^(n+1)),n)),print1(p,“,”););}\\_Michel Marcus_,2015年1月11日
%Y参见A001590、A001631、A100683、A231574、A231555、A232543、A214899、A020992、A233554、A214727、A234696、A141523、A235862、A214825、A235873、A00163、A241660、A247027、A000288、A247561、A000322、A248920、A000383、A247192、A060455、A253318。
%K nonn公司
%O 1,1号机组
%2014年12月30日A报价