A244770 Prime numbers ending in the prime number 47.
47, 347, 547, 647, 947, 1447, 1747, 1847, 2347, 2447, 2647, 3347, 3547, 3847, 3947, 4447, 4547, 5147, 5347, 5647, 6047, 6247, 6547, 6947, 7247, 7547, 8147, 8447, 8647, 8747, 9547, 10247, 10847, 11047, 11447, 12347, 12547, 12647, 13147, 14347, 14447, 14747
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[n: n in PrimesUpTo(16000) | n mod 100 eq 47];
-
Mathematica
Select[Prime[Range[5, 6000]], Take[IntegerDigits[#], -2]=={4, 7} &]
-
PARI
select(x->(x % 100)==47, primes(2000)) \\ Michel Marcus, Jul 06 2014
Comments