OFFSET
1,1
EXAMPLE
1153_10 = 141_32. - Jon E. Schoenfield, Apr 10 2021
MATHEMATICA
b = 32; lst = {}; Do[p = Prime[n]; If[IntegerDigits[p, b] == Reverse[IntegerDigits[p, b]], AppendTo[lst, p]], {n, 2000}]; lst (* T. D. Noe, Apr 19 2012 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Alex Ratushnyak, Apr 19 2012
STATUS
approved