A052168 Primes at which difference pattern X4242Y (X and Y >= 6) occurs in A001223.

1867, 3457, 5647, 15727, 79687, 88807, 101107, 257857, 266677, 276037, 284737, 340927, 354247, 375247, 402757, 419047, 427237, 463447, 470077, 626617, 666427, 736357, 823717, 855727, 959467, 978067, 1022377, 1043587, 1068247, 1118857

Offset

1,1

Comments

All terms are == 7 (mod 30). - Zak Seidov, May 07 2017

Links

Michael De Vlieger, Table of n, a(n) for n = 1..10000 (First 528 terms from Zak Seidov.)

Example

1867 is here because the successor primes (1867),1871,1873,1877,1879 give 4242 difference pattern. The primes around this island are 1861 and 1889 in distance 6 and 10 resp. Thus the d-pattern "around 1867" is {6,4,2,4,2,10}. [corrected by Zak Seidov, May 07 2017]

Mathematica

m=1867; Reap[Do[While[ PrimeQ[m] m = m + 30]; If[
m > NextPrime[m, -1] + 5 &&  AllTrue[m + {4, 6, 10, 12}, PrimeQ] && NextPrime[m + 12] > m + 17, Sow[m]]; m = m + 30, {10^5}]][[2, 1]] (* Zak Seidov, May 07 2017 *)

Crossrefs

Cf. A001223, A052160, A052162-A052168, A022008, A047078.

Sequence in context: A265456 A023744 A054816 * A354444 A237152 A306864

Adjacent sequences: A052165 A052166 A052167 * A052169 A052170 A052171

Keyword

nonn

Author

Labos Elemer, Jan 26 2000

Status

approved