OFFSET
1,3
REFERENCES
M. Cerasoli, F. Eugeni and M. Protasi, Elementi di Matematica Discreta, Bologna 1988
Emanuele Munarini and Norma Zagaglia Salvi, Matematica Discreta, UTET, CittaStudiEdizioni, Milano 1997
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
MATHEMATICA
Select[Range[0, 1000], PrimeQ[#^2+2#+2]&] (* Vincenzo Librandi, May 23 2014 *)
PROG
(Magma)[n: n in [0..400]|IsPrime(n^2+2*n+2)]; // Vincenzo Librandi, Dec 17 2010
(PARI) is(n)=isprime(n^2+2*n+2) \\ Charles R Greathouse IV, Jun 12 2017
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Giovanni Teofilatto, Dec 30 2003
EXTENSIONS
Corrected by Vincenzo Librandi, Dec 17 2010
STATUS
approved