A090716 Primes which are also prime if their base 32 representation is interpreted as a base 10 number.

2, 3, 5, 7, 41, 67, 73, 97, 103, 131, 163, 193, 199, 227, 233, 1031, 1033, 1129, 1223, 1319, 1321, 2081, 2153, 2243, 2273, 2339, 3079, 3169, 3209, 3271, 3299, 3331, 4201, 4289, 5351, 5417, 6151, 6337, 7177, 7369, 8263, 8297, 8387, 8423, 9257, 9319, 9511

Offset

1,1

Links

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

Example

41 is prime; in base 32 it is written "19" and the base 10 number 19 is also prime.

Mathematica

b32Q[n_]:= Module[{idn32=IntegerDigits[n, 32]}, Max[idn32]<10&&PrimeQ[FromDigits[idn32]]]; Select[Prime[Range[PrimePi[10000]]], b32Q] (* Vincenzo Librandi, Apr 18 2013 *)

Crossrefs

Sequence in context: A090714 A048400 A286319 * A083820 A244556 A279954

Adjacent sequences: A090713 A090714 A090715 * A090717 A090718 A090719

Keyword

base,nonn

Author

Cino Hilliard, Jan 18 2004

Extensions

Edited by Jens Kruse Andersen, May 04 2008

Status

approved