A167445 Prime numbers ending in the prime number 61.
61, 461, 661, 761, 1061, 1361, 1861, 2161, 2861, 3061, 3361, 3461, 3761, 4261, 4561, 4861, 5261, 5861, 6361, 6661, 6761, 6961, 7561, 8161, 8461, 8761, 8861, 9161, 9461, 9661, 10061, 10861, 11161, 11261, 12161, 14461, 14561, 15061, 15161, 15361, 15461
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. similar sequence listed in A244763.
Programs
-
Magma
[n: n in PrimesUpTo(16000) | n mod 100 eq 61]; // Vincenzo Librandi, Jul 07 2014
-
Mathematica
Select[Prime[Range[5, 6000]], Take[IntegerDigits[#], -2]=={6, 1} &] (* Vincenzo Librandi, Jul 07 2014 *)
-
PARI
select(x->(x % 100)==61, primes(2000)) \\ Michel Marcus, Jul 07 2014