A024900 Numbers k such that 7*k + 6 is prime.

1, 5, 11, 13, 19, 23, 25, 31, 35, 41, 43, 49, 59, 61, 65, 71, 83, 85, 91, 103, 109, 113, 115, 119, 121, 125, 133, 145, 149, 151, 155, 173, 175, 179, 185, 199, 203, 211, 215, 221, 223, 229, 233, 241, 245, 253, 263, 265, 269, 275, 281, 283, 289, 299, 301, 305, 319, 323, 325, 329

Offset: 1

Author

Clark Kimberling

Keywords

• nonn
• easy

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A045473 (associated primes).

Programs

Magma

[n: n in [1..400] | IsPrime(7*n+6)]; // Vincenzo Librandi, Nov 20 2010

Mathematica

Select[Range[400], PrimeQ[7# + 6] &] (* Vincenzo Librandi, Sep 25 2012 *)

PARI

is(n)=isprime(7*n+6) \\ Charles R Greathouse IV, Sep 25 2012