The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

Thanks to everyone who made a donation during our annual appeal!
To see the list of donors, or make a donation, see the OEIS Foundation home page.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A052168 Primes at which difference pattern X4242Y (X and Y >= 6) occurs in A001223. 16

%I

%S 1867,3457,5647,15727,79687,88807,101107,257857,266677,276037,284737,

%T 340927,354247,375247,402757,419047,427237,463447,470077,626617,

%U 666427,736357,823717,855727,959467,978067,1022377,1043587,1068247,1118857

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

%C All terms are == 7 (mod 30). - _Zak Seidov_, May 07 2017

%H Zak Seidov, <a href="/A052168/a052168.txt">First 528 terms.</a>

%e 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]

%t m=1867; Reap[Do[While[ PrimeQ[m] m = m + 30]; If[

%t 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 *)

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

%K nonn

%O 1,1

%A _Labos Elemer_, Jan 26 2000

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified January 17 23:37 EST 2020. Contains 330995 sequences. (Running on oeis4.)