A067388 Initial prime in set of 4 consecutive primes with common gap 48.
55410683, 102291263, 141430363, 226383163, 280064453, 457433213, 531290533, 542418463, 555695713, 582949903, 629444003, 664652203, 665813153, 777809113, 802919653, 852404053, 887653633, 894328243, 898734673, 979048313, 993517643
Offset: 1
Keywords
Links
- Chai Wah Wu, Table of n, a(n) for n = 1..1000 (terms 1..102 from Zak Seidov)
- Index entries for sequences related to primes in arithmetic progressions
Crossrefs
Programs
-
Mathematica
Transpose[Select[Partition[Prime[Range[10000000]], 4, 1], Union[Differences[#]]=={48}&]][[1]] (* Vincenzo Librandi, Jun 21 2015 *)
-
Python
from sympy import isprime, nextprime A067388_list, p = [], 2 q, r, s = p+48, p+96, p+144 while s <= 10**10: np = nextprime(p) if np == q and isprime(r) and isprime(s) and nextprime(q) == r and nextprime(r) == s: A067388_list.append(p) p, q, r, s = np, np+48, np+96, np+144 # Chai Wah Wu, Jun 01 2017
Extensions
a(7)-a(21) from Donovan Johnson, Sep 05 2008