login
Prime numbers ending in the prime number 37.
2

%I #15 Feb 22 2024 19:53:54

%S 37,137,337,937,1237,1637,2137,2237,2437,2837,3037,3137,3637,4337,

%T 4637,4937,5237,5437,5737,6037,6337,6637,6737,7237,7537,7937,8237,

%U 8537,8737,8837,9137,9337,9437,10037,10337,10837,10937,11437,12037,12437,12637,13037

%N Prime numbers ending in the prime number 37.

%C Also primes of the form 100*n+37. Subsequence of A141886, A141936.

%H Vincenzo Librandi, <a href="/A244768/b244768.txt">Table of n, a(n) for n = 1..1000</a>

%t Select[Prime[Range[5, 6000]], Take[IntegerDigits[#], -2]=={3, 7} &]

%t Select[Prime[Range[2000]],Mod[#,100]==37&] (* _Harvey P. Dale_, Dec 25 2022 *)

%o (Magma) [n: n in PrimesUpTo(16000) | n mod 100 eq 37];

%o (PARI) select(x->(x % 100)==37, primes(2000)) \\ _Michel Marcus_, Jul 06 2014

%Y Cf. A141886, A141936.

%Y Cf. similar sequences listed in A244763.

%K nonn,base,easy

%O 1,1

%A _Vincenzo Librandi_, Jul 06 2014