OFFSET
1,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
MATHEMATICA
Select[Range[600], PrimeQ[(405*#^8 + 108*#^6 + 27*#^4 + 6*#^2 + 1)] &] (* Vincenzo Librandi, Sep 29 2012 *)
PROG
(Magma) [n: n in [0..600] | IsPrime(405*n^8 + 108*n^6 + 27*n^4 + 6*n^2 + 1)]; Vincenzo Librandi, Sep 29 2012
(PARI) is(n)=isprime(405*n^8+108*n^6+27*n^4+6*n^2+1) \\ Charles R Greathouse IV, Jun 12 2017
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
James R. Buddenhagen, Feb 13 2001
STATUS
approved