A052198 Primes p such that p, p+42, p+84 are consecutive primes.
247099, 689467, 1008617, 1629767, 1658627, 2024647, 2750999, 2811719, 2880907, 2921777, 3264449, 3295027, 3311317, 3365449, 3555269, 3668419, 4059229, 4412099, 4440529, 4549309, 4619357, 4690219, 4802947, 4955179, 5115259
Offset: 1
Keywords
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000 (terms 1..2000 from Zak Seidov)
Programs
-
Mathematica
Select[Partition[Prime[Range[400000]],3,1],Differences[#]=={42,42}&][[All,1]] (* Harvey P. Dale, May 28 2017 *)
-
PARI
is_A052198(n)=nextprime(n+1)==n+42 && nextprime(n+43)==n+84 && isprime(n) \\ Charles R Greathouse IV, Jan 07 2013, typo corrected by M. F. Hasler, Jan 13 2013
Extensions
New name from Charles R Greathouse IV, Jan 07 2013
Comments