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 A210840 #22 Sep 08 2022 08:46:01 %S A210840 0,1,256,6561,65536,390625,1679616,5764801,16777216,43046721,1,2,257, %T A210840 6562,65537,390626,1679617,5764802,16777217,43046722,256,257,512,6817, %U A210840 65792,390881,1679872,5765057,16777472,43046977,6561,6562,6817,13122,72097,397186 %N A210840 Sum of the 8th powers of the digits of n. %C A210840 This is to exponent 8 as A007953 is to exponent 0, A003132 is to exponent 2, and A055013 is to exponent 4. The subsequence of primes (for n = 11, 12, 14, 21, 41, ...) begins 2, 257, 65537, 65537. %e A210840 a(12) = 1^8 + 2^8 = 257. %t A210840 Table[Total[IntegerDigits[n]^8], {n, 0, 100}] (* _T. D. Noe_, May 18 2012 *) %t A210840 Table[Sum[DigitCount[n][[i]] i^8, {i, 9}], {n, 0, 35}] (* _Bruno Berselli_, Feb 01 2013 *) %o A210840 (Magma) [0] cat [&+[d^8: d in Intseq(n)]: n in [1..35]]; // _Bruno Berselli_, Feb 01 2013 %Y A210840 Cf. A007953, A003132, A055013. %K A210840 nonn,base,easy %O A210840 0,3 %A A210840 _Jonathan Vos Post_, May 10 2012