OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
FORMULA
a(n) = 2+3*(A103564(n))^2.
MATHEMATICA
Select[(3#^2+2)&/@Prime[Range[500]], PrimeQ] (* Harvey P. Dale, Nov 04 2011 *)
PROG
(Magma) [a: p in PrimesUpTo(2000)|IsPrime(a) where a is 3*p^2 + 2]; // Vincenzo Librandi, Mar 21 2013
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Zak Seidov, Mar 23 2005
EXTENSIONS
Corrected by Harvey P. Dale, Nov 04 2011
STATUS
approved