A052190 Primes p such that p, p+24, p+48 are consecutive primes.

16763, 40039, 42509, 96353, 98573, 104183, 119243, 123863, 160093, 161783, 169259, 181789, 185243, 208529, 209719, 232753, 235699, 243343, 246049, 260339, 261799, 270073, 295363, 295703, 302459, 315199, 331399, 362003, 364079, 373669, 380729, 381793, 385943, 414809

Offset: 1

Author

Labos Elemer, Jan 28 2000

Keywords

• nonn

Comments

Old name was "Primes p(k) such that p(k+2)-p(k+1)=p(k+1)-p(k)=24."

Examples

			40039 is followed by 40063 and 40087, consecutive primes with equal distance of 24.
		

Links

• Amiram Eldar, Table of n, a(n) for n = 1..10000 (terms 1..1000 from Harvey P. Dale)

Crossrefs

Subsequence of A098974.

Cf. A001223, A033451, A047948, A052188, A052189.

Programs

Mathematica

Select[Partition[Prime[Range[40000]],3,1],Differences[#]=={24,24}&][[All,1]] (* Harvey P. Dale, May 09 2019 *)

PARI

list(lim) = {my(p1 = 2, p2 = 3); forprime(p3 = 5, lim, if(p2 - p1 == 24 && p3 - p2 == 24, print1(p1, ", ")); p1 = p2; p2 = p3);} \\ Amiram Eldar, Feb 28 2025

Extensions

Name changed by Jon E. Schoenfield, May 30 2018