A167627 Prime numbers ending in the prime number 163.
163, 1163, 3163, 6163, 10163, 12163, 13163, 19163, 21163, 25163, 28163, 39163, 40163, 48163, 52163, 54163, 55163, 57163, 69163, 70163, 76163, 78163, 81163, 82163, 84163, 90163, 91163, 106163, 112163, 115163, 117163, 118163, 120163
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..2000
Crossrefs
Cf. similar sequences listed in A244763.
Programs
-
Magma
[n: n in PrimesUpTo(160000) | n mod 1000 eq 163]; // Vincenzo Librandi, Jul 07 2014
-
Mathematica
Select[Prime@Range[ 200000], Mod[#, 1000]==163 &] (* Vincenzo Librandi, Jul 07 2014 *) Select[Table[1000n+163,{n,0,150}],PrimeQ] (* This program is several hundred times more efficient that the program above. *) (* Harvey P. Dale, Jan 16 2023 *)