OFFSET
1,2
COMMENTS
Equivalently, numbers n such that (n+1)^2 - 2 is prime.
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
FORMULA
a(n) = 2*A088572(n).
MATHEMATICA
Select[Range[1000], PrimeQ[#^2 + 2 # - 1] &] (* Vincenzo Librandi, May 24 2014 *)
PROG
(Magma) [n: n in [0..400] | IsPrime(n^2+2*n-1)]; // Vincenzo Librandi, Dec 17 2010
(PARI) is(n)=isprime(n^2+2*n-1) \\ Charles R Greathouse IV, Jun 05 2017
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Giovanni Teofilatto, Dec 31 2003
EXTENSIONS
Corrected (1 prepended and 96 replaced with 92) by Vincenzo Librandi, Dec 17 2010
STATUS
approved