OFFSET
1,1
COMMENTS
All terms are divisible by 6.
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
a(5) = 114 is a term because 2*114-1 = 227, 2*114+1 = 229, 5*114-1 = 569 and 5*114+1 = 571 are all prime.
MAPLE
filter:= proc(n) andmap(isprime, [2*n-1, 2*n+1, 5*n-1, 5*n+1]) end proc:
select(filter, [seq(i, i = 6..30000, 6)]);
MATHEMATICA
Select[Range[6, 30000, 6], AllTrue[{2*#-1, 2*#+1, 5*#-1, 5*#+1}, PrimeQ] &] (* Paolo Xausa, Apr 21 2026 *)
PROG
(PARI) first(nn)= my(r=List()); forstep(t=6, oo, 6, if(isprime(2*t-1) && isprime(5*t-1) && isprime(2*t+1) && isprime(5*t+1), listput(~r, t); #r<nn || break)); Vec(r); \\ Ruud H.G. van Tol, Apr 21 2026
CROSSREFS
KEYWORD
nonn
AUTHOR
Will Gosnell and Robert Israel, Apr 15 2026
STATUS
approved
