OFFSET
1,3
COMMENTS
One less than the associated term in A024899. - R. J. Mathar, Jan 05 2011
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
MATHEMATICA
Select[Range[0, 150], PrimeQ[6# + 7] &] (* Vincenzo Librandi, Sep 24 2012 *)
PROG
(Magma) [n: n in [0..150] | IsPrime(6*n + 7)]; // Vincenzo Librandi, Sep 24 2012
(PARI) is(n)=isprime(6*n+7) \\ Charles R Greathouse IV, Sep 24 2012
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vincenzo Librandi, Dec 21 2008
STATUS
approved