login
A090714
Primes which are also prime if their base 19 representation is interpreted as a base 10 number.
3
2, 3, 5, 7, 41, 47, 79, 83, 383, 419, 457, 463, 503, 541, 769, 839, 877, 1103, 1109, 1181, 1187, 1453, 1483, 1523, 1559, 1907, 1979, 2243, 2281, 2593, 2663, 2897, 2927, 3041, 3313, 3347, 3389, 6917, 7229, 7603, 7607, 7639, 7723, 7753, 7759, 7949, 8363, 8369
OFFSET
1,1
LINKS
EXAMPLE
41 is prime; in base 19 it is written "23" and the base 10 number 23 is also prime.
MATHEMATICA
b19Q[n_]:= Module[{idn19=IntegerDigits[n, 19]}, Max[idn19]<10&&PrimeQ[FromDigits[idn19]]]; Select[Prime[Range[PrimePi[9000]]], b19Q] (* Vincenzo Librandi, Apr 18 2013 *)
CROSSREFS
Sequence in context: A336413 A110363 A235395 * A048400 A286319 A090716
KEYWORD
base,nonn
AUTHOR
Cino Hilliard, Jan 18 2004
EXTENSIONS
Edited by Jens Kruse Andersen, May 04 2008
STATUS
approved