A078950 Primes p such that the differences between the 5 consecutive primes starting with p are (2,6,6,4).
149, 599, 27059, 31319, 42179, 65699, 75209, 85829, 87539, 92219, 135599, 170759, 205949, 221069, 249419, 274829, 278609, 280589, 287849, 302579, 307259, 308309, 350429, 355499, 398339, 406499, 416399, 422549, 541529, 566549, 573479, 585839, 603899, 609599, 637709
Offset: 1
Keywords
Examples
149 is in the sequence since 149, 151 = 149 + 2, 157 = 149 + 8, 163 = 149 + 14 and 167 = 149 + 18 are consecutive primes.
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Crossrefs
Programs
-
Mathematica
Select[Partition[Prime[Range[50000]], 5, 1], Differences[#] == {2, 6, 6, 4} &][[;;, 1]] (* Amiram Eldar, Feb 21 2025 *)
-
PARI
list(lim) = {my(p1 = 2, p2 = 3, p3 = 5, p4 = 7); forprime(p5 = 11, lim, if(p2 - p1 == 2 && p3 - p2 == 6 && p4 - p3 == 6 && p5 - p4 == 4, print1(p1, ", ")); p1 = p2; p2 = p3; p3 = p4; p4 = p5);} \\ Amiram Eldar, Feb 21 2025
Formula
a(n) == 29 (mod 30). - Amiram Eldar, Feb 21 2025
Extensions
Edited by Dean Hickerson, Dec 20 2002
Comments