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,1

Links

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

Mathematica

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

Prog

(PARI) forprime(p=2, 10^5, if(p%100==31, print1(p, ", "))); /* Joerg Arndt, Apr 01 2011 */
(Magma) [n: n in PrimesUpTo(14000) | n mod 100 eq 31]; - Vincenzo Librandi and Bruno Berselli, Apr 02 2011

Crossrefs

Sequence in context: A141931 A044363 A044744 * A250462 A123236 A142561

Adjacent sequences: A167385 A167386 A167387 * A167389 A167390 A167391

Keyword

nonn,base

Author

Mark A. Thomas, Nov 02 2009

Status

approved