OFFSET
1,1
COMMENTS
Apart from initial term, same as A002476 = A007645 \ {2} = A045331 \ {2,3}. - M. F. Hasler, Apr 25 2008
Primes of the form 6*m - 3/2 -+ 5/2. A045375 UNION A045410 = A000040. - Juri-Stepan Gerasimov, Jan 28 2010
a(n)^k + 2 is composite for every positive integer k. Proof: For p = a(n) (i.e., p = 2 or p == 1 (mod 3)), p^k + 2 is composite for all k >= 1. If p = 2, then p^k + 2 = 2*(2^(k - 1) + 1) > 2. If p == 1 (mod 3), then p^k == 1 (mod 3), so p^k + 2 == 0 (mod 3) and > 3. - Felix Huber, May 27 2026
LINKS
Felix Huber, Table of n, a(n) for n = 1..10000
MAPLE
A045375List := proc(N)
local i;
[2, op(select(isprime, [seq(3*i + 1, i = 2 .. floor(N/3))]))];
end proc:
A045375List(691); # Felix Huber, May 27 2026
MATHEMATICA
Select[Prime[Range[150]], MemberQ[{1, 2}, Mod[#, 6]] &] (* Vladimir Joseph Stephan Orlovsky, Feb 18 2012 *)
PROG
(Magma) [p: p in PrimesUpTo(740)|p mod 6 in {1, 2}]; // Vincenzo Librandi, Dec 18 2010
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
More terms from Vincenzo Librandi, Dec 18 2010
STATUS
approved
