login
A108588
Numbers k such that 10*k + 97 is prime.
2
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
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
KEYWORD
nonn,easy
AUTHOR
Parthasarathy Nambi, Jul 05 2005
EXTENSIONS
More terms from Stefan Steinerberger, Feb 12 2006
STATUS
approved