A048341 Equal to the sum of its digits raised to its reversed digits power (0^0=1).

1, 48625, 397612

Offset

0,2

Links

Table of n, a(n) for n=0..2.

Harvey Heinz, Narcissistic Numbers

Eric Weisstein's World of Mathematics, Narcissistic Number

Example

48625 = 4^5 + 8^2 + 6^6 + 2^8 + 5^4.

Mathematica

sdrdp[n_]:=Module[{idn=IntegerDigits[n]}, Total[#[[1]]^#[[2]]&/@(Thread[ {idn, Reverse[idn]}]/.{0, 0}->{1, 1})]]; Select[Range[400000], # == sdrdp[#]&] (* Harvey P. Dale, Jul 31 2013 *)

Crossrefs

Cf. A046253, A032799.

Sequence in context: A172554 A244172 A245794 * A062204 A173780 A252444

Adjacent sequences: A048338 A048339 A048340 * A048342 A048343 A048344

Keyword

nonn,base,fini,full,bref

Author

Patrick De Geest, Feb 15 1999

Status

approved