OFFSET
1,2
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*A089038(n+1)-1.
MATHEMATICA
Select[Range[0, 900], PrimeQ[# + 6] &] (* Vincenzo Librandi, Oct 16 2012 *)
PROG
(Magma) [n: n in [0..300]| IsPrime(n + 6)]; // Vincenzo Librandi, Oct 16 2012
(PARI) is(n)=isprime(n+6) \\ Charles R Greathouse IV, May 22 2017
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Giovanni Teofilatto, Aug 29 2003
EXTENSIONS
Corrected and extended by Ray Chandler, Nov 29 2003
STATUS
approved