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.
%I A055576 #18 Dec 10 2024 20:42:26
%S A055576 0,1,28,35,36,46
%N A055576 Sum of digits of a(n)^5 is equal to a(n).
%e A055576 a(2) = 28 because 28^5 = 17210368 and 1+7+2+1+0+3+6+8 = 28
%t A055576 Select[Range[0, 60], #==Total[IntegerDigits[#^5]] &] (* _Vincenzo Librandi_, Feb 23 2015 *)
%o A055576 (PARI) lista(nn) = {for (n=0, nn, if (n^5 == sumdigits(n^5)^5, print1(n, ", ")););} \\ _Michel Marcus_, Feb 23 2015
%o A055576 (Magma) [n: n in [0..50] | &+Intseq(n^5) eq n ]; // _Vincenzo Librandi_, Feb 23 2015
%Y A055576 Cf. A055566, A055571, A046459, A055575, A055577.
%Y A055576 Cf. A152147.
%K A055576 base,fini,full,nonn
%O A055576 1,3
%A A055576 _Henry Bottomley_, May 26 2000
%E A055576 Offset changed to 1 by _Michel Marcus_, Feb 23 2015