OFFSET
1,1
COMMENTS
See comment in A199307.
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
MATHEMATICA
Select[Range[600], PrimeQ[4#^3 - 3]&] (* Vincenzo Librandi, Jan 07 2013 *)
PROG
(Magma) [n: n in [1..500] | IsPrime(4*n^3-3)]; // Vincenzo Librandi, Jan 07 2013
(PARI) is(n)=isprime(4*n^3-3) \\ Charles R Greathouse IV, May 22 2017
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, Nov 05 2011
STATUS
approved