The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A372550 Primes such that the next 10 prime gaps are all distinct. 1
 15919, 15923, 24113, 24517, 30509, 34883, 34897, 36107, 49201, 52747, 56249, 64927, 64937, 66107, 66109, 66191, 67247, 67261, 67271, 67273, 68147, 70639, 70657, 70663, 70667, 70687, 70709, 70717, 71549, 75797, 78317, 78929, 79979, 81083, 81101, 83701, 88301, 94117, 94603, 94613, 96497, 97609 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS Robert Israel, Table of n, a(n) for n = 1..10000 EXAMPLE a(3) = 24113 is a term because it is prime, the next 10 primes are 24121, 24133, 24137, 24151, 24169, 24179, 24181, 24197, 24203, 24223, and the gaps between these 11 primes are 8, 12, 4, 14, 18, 10, 2, 16, 6, 20 which are all distinct. MAPLE P:= [seq(ithprime(i), i=1..11)]: R:= NULL: count:= 0: while count < 100 do P:= [op(P[2..-1]), nextprime(P[-1])]; if nops(convert(P[2..-1]-P[1..-2], set))=10 then count:= count+1; R:= R, P[1]; fi od: R; MATHEMATICA s = {}; Do[If[10 == Length[Union[Differences[Prime[Range[k, k + 10]]]]], AppendTo[s, Prime[k]]], {k, , 10000}]; s CROSSREFS Cf. A079007. Sequence in context: A237071 A251848 A129473 * A237681 A218642 A151811 Adjacent sequences: A372547 A372548 A372549 * A372551 A372552 A372553 KEYWORD nonn AUTHOR Zak Seidov and Robert Israel, May 05 2024 STATUS approved

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

Last modified August 2 19:53 EDT 2024. Contains 374875 sequences. (Running on oeis4.)