A244777 Prime numbers ending in the prime number 89.
89, 389, 1289, 1489, 1789, 1889, 2089, 2389, 2689, 2789, 3089, 3389, 3889, 3989, 4289, 4789, 4889, 5189, 5689, 6089, 6389, 6689, 7489, 7589, 7789, 8089, 8389, 8689, 9689, 10289, 10589, 10789, 10889, 11489, 11689, 11789, 12289, 12589, 12689, 12889
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[n: n in PrimesUpTo(15000) | n mod 100 eq 89];
-
Mathematica
Select[Prime[Range[5, 6000]], Take[IntegerDigits[#], -2]=={8, 9} &] Select[100 Range[0,200]+89,PrimeQ] (* Harvey P. Dale, Nov 13 2022 *)
-
PARI
select(x->(x % 100)==89, primes(2000)) \\ Michel Marcus, Jul 07 2014
Comments