A167626 Prime numbers ending in the prime number 101.

101, 5101, 6101, 8101, 12101, 15101, 20101, 21101, 29101, 42101, 44101, 50101, 53101, 54101, 56101, 60101, 65101, 72101, 74101, 77101, 78101, 81101, 83101, 89101, 95101, 98101, 102101, 107101, 116101, 117101, 119101, 125101, 131101

Offset

1,1

Links

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

Formula

a(n) = 1000*A105106(n)+101. - R. J. Mathar, Nov 13 2009

Maple

select(isprime, [seq(1000*k+101, k=0..1000)]); # Robert Israel, Jul 07 2014

Mathematica

Select[Prime@Range[200000], Mod[#, 1000]==101 &] (* Vincenzo Librandi, Jul 07 2014 *)
Select[Table[1000n+101, {n, 0, 200}], PrimeQ] (* Harvey P. Dale, Mar 22 2020 *)

Prog

(Magma) [n: n in PrimesUpTo(160000) | n mod 1000 eq 101]; // Vincenzo Librandi, Jul 07 2014

Crossrefs

Cf. A105106.

Cf. similar sequences listed in A244763.

Sequence in context: A210169 A027900 A166218 * A017764 A217677 A333689

Adjacent sequences: A167623 A167624 A167625 * A167627 A167628 A167629

Keyword

base,nonn

Author

Mark A. Thomas, Nov 07 2009

Status

approved