A244768 Prime numbers ending in the prime number 37.
37, 137, 337, 937, 1237, 1637, 2137, 2237, 2437, 2837, 3037, 3137, 3637, 4337, 4637, 4937, 5237, 5437, 5737, 6037, 6337, 6637, 6737, 7237, 7537, 7937, 8237, 8537, 8737, 8837, 9137, 9337, 9437, 10037, 10337, 10837, 10937, 11437, 12037, 12437, 12637, 13037
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 37];
-
Mathematica
Select[Prime[Range[5, 6000]], Take[IntegerDigits[#], -2]=={3, 7} &] Select[Prime[Range[2000]],Mod[#,100]==37&] (* Harvey P. Dale, Dec 25 2022 *)
-
PARI
select(x->(x % 100)==37, primes(2000)) \\ Michel Marcus, Jul 06 2014
Comments