A089968 Decimal primes whose decimal representation in base 16 is also prime.

2, 3, 5, 7, 17, 19, 23, 41, 67, 71, 83, 89, 97, 103, 113, 131, 137, 151, 257, 263, 311, 313, 337, 359, 401, 409, 547, 563, 569, 577, 593, 599, 617, 631, 641, 643, 659, 787, 823, 839, 857, 883, 919

Offset

1,1

Links

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

Example

43 is prime in decimal and 43 base 16 is 67 which is also prime in decimal.

Mathematica

b16Q[n_]:= Module[{idn16=IntegerDigits[n, 16]}, Max[idn16]<10&&PrimeQ[FromDigits[idn16]]]; Select[Prime[Range[PrimePi[2000]]], b16Q] (* Vincenzo Librandi, Apr 18 2013 *)

Crossrefs

Sequence in context: A090725 A276141 A214588 * A164060 A356405 A113029

Adjacent sequences: A089965 A089966 A089967 * A089969 A089970 A089971

Keyword

base,nonn

Author

Cino Hilliard, Jan 18 2004

Status

approved