OFFSET
1,1
COMMENTS
Primes in A005491.
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
MAPLE
select(isprime, [seq(n^3+3*n+1, n=1..1000)]); # Robert Israel, Sep 25 2025
PROG
(Magma) [ a: n in [0..250] | IsPrime(a) where a is (n^3+3*n+1)]; // Vincenzo Librandi, Jan 30 2011
CROSSREFS
KEYWORD
nonn
AUTHOR
Graziano Aglietti (mg5055(AT)mclink.it), Aug 23 2010
EXTENSIONS
Definition corrected, incorrect program deleted - R. J. Mathar, Aug 25 2010
STATUS
approved
