login
A090717
Primes which are also prime if their base 64 representation is interpreted as a base 10 number.
1
2, 3, 5, 7, 67, 71, 73, 131, 137, 193, 199, 257, 263, 449, 457, 521, 4099, 4231, 4289, 4297, 4423, 4483, 4547, 4673, 4679, 8329, 8387, 8513, 8641, 8647, 8707, 12487, 12553, 12611, 12739, 12809, 16649, 16903, 20483, 20611, 20743, 20807, 20873
OFFSET
1,1
LINKS
EXAMPLE
67 is prime; in base 64 it is written "13" and the base 10 number 13 is also prime.
MATHEMATICA
b64Q[n_]:= Module[{idn64=IntegerDigits[n, 64]}, Max[idn64]<10&&PrimeQ[FromDigits[idn64]]]; Select[Prime[Range[PrimePi[30000]]], b64Q] (* Vincenzo Librandi, Apr 18 2013 *)
CROSSREFS
Sequence in context: A237441 A171029 A241723 * A090715 A029976 A074310
KEYWORD
base,nonn
AUTHOR
Cino Hilliard, Jan 18 2004
EXTENSIONS
Edited by Jens Kruse Andersen, May 04 2008
STATUS
approved