OFFSET
1,3
COMMENTS
With the exception of the 1, all entries are == 2 (mod 6) or == 4 (mod 6), as in A047235, because otherwise 9*n^2-10*n+3 is divisible by 2 or 3. - R. J. Mathar, Jul 16 2012
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
MATHEMATICA
lst={}; Do[p=9*n^2-10*n+3; If[PrimeQ[p], AppendTo[lst, n]], {n, 0, 7!}]; lst (* Vladimir Joseph Stephan Orlovsky, Feb 21 2009 *)
PROG
(Magma) [n: n in [0..400] | IsPrime(9*n^2-10*n+3)]; // Vincenzo Librandi, Sep 24 2012
(PARI) is(n)=isprime(9*n^2-10*n+3) \\ Charles R Greathouse IV, May 22 2017
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vincenzo Librandi, Feb 21 2009
EXTENSIONS
Edited by Robert Hochberg, Jun 21 2010
STATUS
approved