A167388 Prime numbers ending in the prime number 31.

31, 131, 331, 431, 631, 1031, 1231, 1531, 1831, 1931, 2131, 2531, 2731, 3331, 3631, 3931, 4231, 4831, 4931, 5231, 5431, 5531, 6131, 7331, 8231, 8431, 8731, 8831, 9431, 9631, 9931, 10331, 10531, 10631, 10831, 11131, 11731, 11831, 13331, 13831, 13931

Offset: 1

Author

Mark A. Thomas, Nov 02 2009

Keywords

• nonn
• base

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Programs

Magma

[n: n in PrimesUpTo(14000) | n mod 100 eq 31]; // Vincenzo Librandi and Bruno Berselli, Apr 02 2011

Mathematica

Select[Prime[Range[6,1700]],Take[IntegerDigits[#],-2] =={3,1}&]  (* Harvey P. Dale, Mar 31 2011 *)

PARI

forprime(p=2,10^5,if(p%100==31,print1(p,", "))); /* Joerg Arndt, Apr 01 2011 */