A118715 Numbers n such that the digital reversal of n is a perfect power (A001597).

0, 1, 4, 8, 9, 10, 18, 23, 40, 46, 52, 61, 63, 72, 80, 90, 94, 100, 121, 144, 148, 163, 169, 180, 215, 230, 342, 343, 400, 423, 441, 460, 484, 487, 520, 521, 522, 526, 610, 612, 630, 652, 675, 676, 691, 720, 800, 821, 900, 925, 927, 940, 961, 982, 1000, 1042, 1062

Offset

1,3

Links

Table of n, a(n) for n=1..57.

Example

63 is a member of the sequence since its digital reversal, 36=6^2, is the ninth perfect power.

Mathematica

fQ[n_] := Block[{rid = FromDigits@ Reverse@ IntegerDigits@n}, rid == 0 || rid == 1 || GCD @@ Last /@ FactorInteger@ rid > 1]; Select[ Range[0, 1088], fQ@# &] (* Robert G. Wilson v *)

Crossrefs

Cf. A001597.

Sequence in context: A251606 A073042 A094349 * A175839 A226085 A104623

Adjacent sequences: A118712 A118713 A118714 * A118716 A118717 A118718

Keyword

base,easy,nonn,less

Author

Giovanni Teofilatto, May 21 2006

Extensions

Edited and extended by Robert G. Wilson v, May 22 2006

Status

approved