OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
MATHEMATICA
Prime[ Select[ Range[200], PrimeQ[ FromDigits[ Reverse[ IntegerDigits[ Prime[ # ], 6]], 6]] &]]
Select[Prime[Range[200]], PrimeQ[FromDigits[Reverse[IntegerDigits[#, 6]], 6]]&] (* Harvey P. Dale, Oct 12 2023 *)
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Robert G. Wilson v, Sep 09 2002
STATUS
approved