A014546 Primes in Sylvester's sequence A000058.
2, 3, 7, 43, 3263443
Offset: 1
Keywords
Links
- Jens Kruse Andersen, Factorization of Sylvester's sequence
- Eric Weisstein's World of Mathematics, Sylvester's Sequence
Programs
-
Mathematica
a = {}; k = 2; Do[k = k^2 - k + 1; If[PrimeQ[k], AppendTo[a, k]], {n, 1, 15}]; a (* Artur Jasinski, Sep 20 2008 *)
Comments