A108588 Numbers k such that 10*k + 97 is prime.

0, 1, 3, 4, 6, 7, 10, 13, 16, 18, 21, 22, 24, 25, 27, 30, 36, 37, 39, 45, 46, 48, 49, 51, 52, 55, 58, 63, 66, 69, 70, 73, 76, 78, 79, 81, 84, 85, 87, 88, 90, 99, 100, 102, 109, 112, 114, 118, 120, 121, 123, 127, 133, 135, 139, 147, 150

Offset

1,3

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Example

k = 0 is a term because 10*0 + 97 = 97 (prime).
k = 27 is a term because 10*27 + 97 = 367 (prime).

Mathematica

For[n = 0, n < 150, n++, If[PrimeQ[10*n + 97], Print[n]]] (* Stefan Steinerberger, Feb 12 2006 *)
Select[Range[0, 200], PrimeQ[10#+97]&] (* Harvey P. Dale, Oct 23 2019 *)

Prog

(PARI) is(n)=isprime(10*n+97) \\ Charles R Greathouse IV, Jun 13 2017
(Magma) [n: n in [0..400] | IsPrime(10*n+97)]; // G. C. Greubel, Oct 22 2023
(SageMath) [n for n in (0..400) if is_prime(10*n+97)] # G. C. Greubel, Oct 22 2023

Crossrefs

Cf. A108584, A108594, A108595.

Sequence in context: A032387 A026313 A024912 * A194095 A064404 A294488

Adjacent sequences: A108585 A108586 A108587 * A108589 A108590 A108591

Keyword

nonn,easy

Author

Parthasarathy Nambi, Jul 05 2005

Extensions

More terms from Stefan Steinerberger, Feb 12 2006

Status

approved