来自在线整数百科全书的问候语!ORI/OEIS.Org/y*搜索:ID:A161620,示出了1-1的1πI A161620%,S A161620,2,630210510510%N A161620,对于某个整数n ^ 2+n的初等数n=C A161620质数M,使得4M+1为正方形。http://http://- 10月23日Max AlkeSyvev,10月23日2011 C %A161620,形式为n^ 2+n=n(n+1),n=1的值构成a215699。3月27日,2018岁的C. Nelson,D. E. Penney和C. Pomerance,714和715《娱乐数学》(1974)7(2),87.89.[警告:截至2018年3月,该网站似乎已被黑客攻击。小心行事。原始内容应该从回车机中检索并添加到这里。- 3月29日J.A.SLaNeNe],2018 %F A161620 A(n)=A034 866(A21565 8(n))。- _Jeppe Stig Nielsen_, Mar 27 2018 %e A161620 2 = 1*2 = 2 %e A161620 2*3 = 2*3 = 6 %e A161620 2*3*5 = 5*6 = 30 %e A161620 2*3*5*7 = 14*15 = 210 %e A161620 2*3*5*7*11*13*17 = 714*715 = 510510 %t A161620 p=1; Do[p=p*Prime[c]; f=Floor[Sqrt[p]]; If[p==f*(f+1), Print[p]],{c,1000}] %o A161620 (PARI) N=10^8;si=30;q=vector(si,i,nextprime(i*N));a=vector(si,i,1);forprime(p=2,N,for(i=1,si,a[i]=(a[i]*p)%q[i]);v=1;for(i=1,si,if(kronecker(4*a[i]+1,q[i])==-1,v=0;break));if(v,T=1;forprime(r=2,p,T*=r);print1(T","))) %o A161620 (PARI) pr=1;forprime(p=2,,pr*=p;s=sqrtint(pr);s*(s+1)==pr&&print1(pr,", ")) \\ _Jeppe Stig Nielsen_, Mar 27 2018 %Y A161620 Cf. A002110, A002378, A215658, {%A16K,A161620,NN,硬,多,%A161620,1,1%,A161620,丹尼尔TyDaleEi,6月14日,2009×%E A161620编辑,由汉斯哈维曼尼,DEC 02 2010 2010 %E A161620编辑由X Max AlkeEyve],DEC 03 2010 2010 %E A161620编辑的罗伯特GrBiZZY,DEC 04 2010‰内容可在OEIS最终用户许可协议:HTTP:/OEIS.Org/许可证下获得A21565