A052188 Primes p such that p, p+12, p+24 are consecutive primes.

199, 1499, 4397, 4679, 7829, 9859, 11287, 11399, 11719, 12829, 15149, 16607, 17419, 17839, 18329, 18719, 19727, 19937, 20149, 20509, 20719, 21649, 22039, 22247, 23789, 25609, 26029, 28057, 29587, 30047, 31039, 32467, 34159, 35117

Offset

1,1

Comments

Corresponds to two consecutive 12's in A001223. - - M. F. Hasler, Jan 02 2020

Links

Zak Seidov, Table of n, a(n) for n = 1..1000

OEIS wiki, Consecutive primes in arithmetic progression: CPAP with given gap, updated Jan. 2020

Example

a(1)=199, followed by 199+12=211, 199+12+12=223 consecutive primes.

Mathematica

Transpose[Select[Partition[Prime[Range[3800]], 3, 1], Union[Differences[#]] =={12}&]][[1]]  (* Harvey P. Dale, Apr 26 2011 *)

Prog

(PARI) lista(nn) = {forprime(p=1, nn, q = nextprime(p+1); r = nextprime(q+1); if ((r-q==12) && (q-p==12), print1(p, ", ")); ); } \\ Michel Marcus, Jun 27 2015
(Magma) [p:p in PrimesUpTo(36000)| NextPrime(p)-p eq 12 and  NextPrime(p+12)-p eq 24]; // Marius A. Burtea, Jan 03 2020

Crossrefs

Generalization of A047948 and A033451 if 6 replaced by 12. Cf. A033447.

Sequence in context: A155507 A159064 A117594 * A086977 A324628 A216346

Adjacent sequences: A052185 A052186 A052187 * A052189 A052190 A052191

Keyword

nonn

Author

Labos Elemer, Jan 28 2000

Extensions

Name changed by Jon E. Schoenfield, May 30 2018

Status

approved