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

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A079015 Primes introducing consecutive prime 6-tuple of primes or 5-tuple corresponding consecutive p-difference pattern as follows: {d, 2*d, 4*d, 8*d, 16*d}. 3
 6824897, 10132607, 12674657, 13699457, 14148047, 27353237, 43918997, 44152307, 50608007, 53944337, 60426257, 60825827, 61325057, 68721047, 68933717, 72069707, 78577817, 82108127, 82334297, 87020177, 88226777, 97013927, 102043757, 106053917, 114412937, 122271557 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS Table of n, a(n) for n=1..26. EXAMPLE prime(45277466) = 884909087 is followed by {2, 4, 8, 16, 32, 10, 50, ...} difference pattern. prime(9312431) = 166392559 initiates {4, 8, 16, 32, 64, 14, 30, ...} difference pattern of consecutive primes. MATHEMATICA d[x_] := Prime[x+1]-Prime[x]; k=0; Do[s=d[n]; If[Equal[d[n+1], 2*s]&&Equal[d[n+2], 4*s]&&Equal[d[n+3], 8*s] &&Equal[d[n+4], 16*s], k=k+1; Print[{n, Prime[n]}]], {n, 1, 100000000}] (* or *) prmsUpTo[k_] := First /@ Select[Partition[Prime@ Range[PrimePi[k]], 6, 1], Differences @# == {2, 4, 8, 16, 32} &]; prmsUpTo[10^9] (* Mikk Heidemaa, Apr 26 2024 *) CROSSREFS Cf. A079011, A079012, A079013, A079014. Sequence in context: A345608 A346282 A088238 * A372085 A185435 A185427 Adjacent sequences: A079012 A079013 A079014 * A079016 A079017 A079018 KEYWORD nonn AUTHOR Labos Elemer, Jan 22 2003 EXTENSIONS More terms from Jinyuan Wang, Feb 10 2021 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 July 13 12:04 EDT 2024. Contains 374282 sequences. (Running on oeis4.)