OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
MATHEMATICA
Select[Table[n^5-n^3-2n^2+1, {n, 0, 90}], PrimeQ] (* Harvey P. Dale, Jan 19 2012 *)
PROG
(Magma) [a: n in [0..250] | IsPrime(a) where a is n^5-n^3-2*n^2+1];
CROSSREFS
KEYWORD
nonn,easy,less
AUTHOR
Vincenzo Librandi, Jun 05 2010
STATUS
approved