OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000 (terms 1..1000 from Harvey P. Dale)
MATHEMATICA
Prime[ Select[ Range[150], PrimeQ[ FromDigits[ Reverse[ IntegerDigits[ Prime[ # ], 8]], 8]] &]]
Select[Prime[Range[200]], PrimeQ[IntegerReverse[#, 8]]&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jun 09 2017 *)
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Robert G. Wilson v, Sep 09 2002
STATUS
approved