login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A167627
Prime numbers ending in the prime number 163.
2
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,1
LINKS
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 *)
PROG
(Magma) [n: n in PrimesUpTo(160000) | n mod 1000 eq 163]; // Vincenzo Librandi, Jul 07 2014
CROSSREFS
Cf. similar sequences listed in A244763.
Sequence in context: A054466 A221903 A002149 * A109343 A217644 A185500
KEYWORD
base,nonn
AUTHOR
Mark A. Thomas, Nov 07 2009
STATUS
approved