%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