OFFSET
1,1
COMMENTS
This is a "modular arithmetic progression" of successive primes, modulo 6.
LINKS
EXAMPLE
For n = 1: a(1) = 23 is followed by a difference 6 to give 29, a prime.
For n = 5 a(5) = 1741 is followed by differences {6, 6, 6, 18, 6} and results in {1741, 1747, 1753, 1759, 1777, 1783} consecutive prime sequence.
For n = 10: a(10) = 406951 is prime prime is followed by {18, 12, 12, 30, 24, 12, 24, 36, 18, 12} consecutive differences pattern.
PROG
(PARI) list(len) = {my(s = vector(len), v = [], prv = 2, c = 0, i, q, d); forprime(p = 3, , d = p - prv; if(d % 6, if(q > 0, i = #v; if(i > 0 && i <= len && s[i] == 0, s[i] = q; c++)); v = [], if(#v == 0, q = prv); v = concat(v, p)); prv = p; if(c == len, break)); s; } \\ Amiram Eldar, Mar 11 2025
CROSSREFS
KEYWORD
nonn,changed
AUTHOR
Labos Elemer, May 17 2000
EXTENSIONS
a(11)-a(21) from Sean A. Irvine, Jan 25 2022
a(8) corrected, a(22)-a(27) added, and name clarified by Amiram Eldar, Mar 11 2025
STATUS
approved