OFFSET
1,1
REFERENCES
Garath A. Jones and Mary Jones, Elementary Number Theory, Springer - Verlag London, 1998; p. 35, Exercise 2.17.
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
MATHEMATICA
Select[Prime[Range[100]], ! PrimeQ[(3#)^2 + 2] &] (* Harvey P. Dale, Jun 14 2011 *)
PROG
(PARI) g(n) = forprime(x=0, n, y=9*x^2+2; if(!isprime(y), print1(x", ")))
(Magma) [p: p in PrimesUpTo(500) | not IsPrime(9*p^2+2)]; // Vincenzo Librandi, Apr 17 2013
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Cino Hilliard, Mar 19 2007
STATUS
approved
