A024913 Numbers k such that 10*k - 7 is prime.

1, 2, 3, 5, 6, 8, 9, 11, 12, 17, 18, 20, 23, 24, 27, 29, 30, 32, 36, 38, 39, 44, 45, 47, 51, 53, 57, 60, 62, 65, 66, 68, 69, 74, 75, 78, 83, 86, 87, 89, 96, 99, 102, 104, 107, 110, 111, 113, 116, 117, 120, 122, 123, 129, 131, 138, 143, 144, 146, 149, 150, 153, 155, 156, 159, 162, 167

Offset

1,2

Links

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

Mathematica

Select[Range[500], PrimeQ[10 # - 7] &] (* Vincenzo Librandi, May 19 2014 *)

Prog

(Magma) [n: n in [1..1000] |IsPrime(10*n-7)]; Vincenzo Librandi, Nov 19 2010
(PARI) is(n)=isprime(10*n-7) \\ Charles R Greathouse IV, Jun 06 2017

Crossrefs

Cf. A030431 (associated primes).

Sequence in context: A364000 A211265 A327423 * A284934 A320928 A186225

Adjacent sequences: A024910 A024911 A024912 * A024914 A024915 A024916

Keyword

nonn,easy

Author

Clark Kimberling

Status

approved