OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..3000
MATHEMATICA
Select[Table[n^3+4, {n, 0, 7000}], PrimeQ]
PROG
(Magma) [a: n in [0..800] | IsPrime(a) where a is n^3+4]
CROSSREFS
KEYWORD
nonn,easy,changed
AUTHOR
Vincenzo Librandi, Nov 30 2011
STATUS
approved