login
Primes whose base 6 reversal is also prime.
7

%I #7 Oct 12 2023 15:46:49

%S 2,3,5,7,11,31,37,41,43,53,59,61,67,71,181,191,193,197,199,211,227,

%T 233,257,263,271,277,281,293,307,311,313,317,331,337,349,359,367,373,

%U 379,383,389,431,1087,1093,1103,1109,1117,1123,1153,1187,1193,1201,1213

%N Primes whose base 6 reversal is also prime.

%H Amiram Eldar, <a href="/A075236/b075236.txt">Table of n, a(n) for n = 1..10000</a>

%t Prime[ Select[ Range[200], PrimeQ[ FromDigits[ Reverse[ IntegerDigits[ Prime[ # ], 6]], 6]] &]]

%t Select[Prime[Range[200]],PrimeQ[FromDigits[Reverse[IntegerDigits[#,6]],6]]&] (* _Harvey P. Dale_, Oct 12 2023 *)

%Y Cf. A007500, A074832, A074833, A074834, A075235, A075237, A075238, A075239.

%K base,easy,nonn

%O 1,1

%A _Robert G. Wilson v_, Sep 09 2002