A089009 Numbers n such that 2*p(n)+3, 2*p(n+1)+3, 2*p(n+2)+3, 2*p(n+3)+3 are consecutive primes, where p(i) denotes the i-th prime.
62178, 159794, 308508, 336390, 350046, 376777, 395837, 492449, 611190, 627072, 643266, 643267, 830501, 887720, 922151, 961608, 1009939, 1011676, 1174998, 1487107, 1492042, 1725364, 1754501, 1780962, 1815913, 2048082, 2235662
Offset: 1
Keywords
Examples
p(62178)=776117, 2*776117+3=1552237=p(117814). p(62179)=776119, 2*776119+3=1552241=p(117815). p(62180)=776137, 2*776137+3=1552277=p(117816). p(62181)=776143, 2*776143+3=1552289=p(117817).
Links
- Pierre CAMI, Table of n, a(n) for n = 1..135
Programs
-
Mathematica
cpQ[n_]:=Module[{p1=2Prime[n]+3,p2=2Prime[n+1]+3,p3=2Prime[n+2]+3,p4 = 2Prime[ n+3]+3}, PrimeQ[ p1] &&NextPrime[p1]==p2&&NextPrime[p2]==p3 && NextPrime[p3]==p4]; Select[Range[2236000],cpQ] (* Harvey P. Dale, Aug 15 2020 *)
Extensions
Corrected and extended by Ray Chandler, Nov 04 2003