OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
MATHEMATICA
Select[Prime[Range[200]], PrimeQ[6#+7]&] (* Harvey P. Dale, Nov 25 2012 *)
PROG
(Magma) [n: n in PrimesUpTo(900) | IsPrime(6*n+7)]; // Vincenzo Librandi, Nov 19 2010
(PARI) is(n)=isprime(6*n+7) && isprime(n) \\ Charles R Greathouse IV, Apr 18 2020
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
STATUS
approved