A359490 Primes p followed by two or more 2-pseudoprimes (A001567) before the next prime.
4363, 13729, 31607, 6973007, 208969199
Offset: 1
Examples
a(n): pseudoprimes following a(n) 4363: 4369, 4371 13729: 13741, 13747 31607: 31609, 31621 6973007: 6973057, 6973063 208969199: 208969201, 208969223
Programs
-
PARI
prp(n,a=2)=Mod(a,n)^(n-1)==1 list(lim)=my(v=List(),p=3); forprime(q=5,lim, my(s=0); forstep(k=p+2,q-2,2, if(prp(k) && s++>1, listput(v,p))); p=q); Vec(v)
Comments