A108594 Numbers k such that 10*k + 101 is prime.

0, 3, 5, 8, 9, 11, 14, 15, 17, 18, 21, 23, 30, 32, 33, 36, 39, 42, 44, 47, 50, 53, 54, 56, 59, 60, 65, 66, 71, 72, 78, 81, 84, 87, 89, 92, 93, 95, 96, 99, 105, 107, 108, 110, 113, 119, 120, 122, 126, 128, 135, 137, 138, 141, 143, 147, 150, 152, 162, 164, 170, 171, 173

Offset: 1

Author

Parthasarathy Nambi, Jul 05 2005

Keywords

• nonn
• easy

Examples

			If n=33 then 10*n + 101 = 431 (prime).
		

Links

• G. C. Greubel, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A030430, A045453, A108595.

Programs

Magma

[n: n in [0..300] | IsPrime(10*n+101)]; // G. C. Greubel, Oct 21 2023

Maple

a:=proc(n) if isprime(10*n+101)=true then n else fi end: seq(a(n),n=0..200); # Emeric Deutsch, Jul 13 2005

Mathematica

Select[Range[0,300], PrimeQ[10*# +101] &] (* G. C. Greubel, Oct 21 2023 *)

PARI

is(n)=isprime(10*n+101) \\ Charles R Greathouse IV, Jun 13 2017

SageMath

[n for n in (0..300) if is_prime(10*n+101)] # G. C. Greubel, Oct 21 2023

Extensions

More terms from Emeric Deutsch, Jul 13 2005