cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

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

This page as a plain text file.
%I A048341 #15 Feb 16 2025 08:32:39
%S A048341 1,48625,397612
%N A048341 Equal to the sum of its digits raised to its reversed digits power (0^0=1).
%H A048341 Harvey Heinz, <a href="http://www.magic-squares.net/narciss.htm">Narcissistic Numbers</a>
%H A048341 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/NarcissisticNumber.html">Narcissistic Number</a>
%e A048341 48625 = 4^5 + 8^2 + 6^6 + 2^8 + 5^4.
%t A048341 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 *)
%Y A048341 Cf. A046253, A032799.
%K A048341 nonn,base,fini,full,bref
%O A048341 0,2
%A A048341 _Patrick De Geest_, Feb 15 1999