A210840 Sum of the 8th powers of the digits of n.

0, 1, 256, 6561, 65536, 390625, 1679616, 5764801, 16777216, 43046721, 1, 2, 257, 6562, 65537, 390626, 1679617, 5764802, 16777217, 43046722, 256, 257, 512, 6817, 65792, 390881, 1679872, 5765057, 16777472, 43046977, 6561, 6562, 6817, 13122, 72097, 397186

Offset: 0

Author

Jonathan Vos Post, May 10 2012

Keywords

• nonn
• base
• easy

Comments

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.

Examples

			a(12) = 1^8 + 2^8 = 257.
		

Crossrefs

Cf. A007953, A003132, A055013.

Programs

Magma

[0] cat [&+[d^8: d in Intseq(n)]: n in [1..35]]; // Bruno Berselli, Feb 01 2013

Mathematica

Table[Total[IntegerDigits[n]^8], {n, 0, 100}] (* T. D. Noe, May 18 2012 *)
Table[Sum[DigitCount[n][[i]] i^8, {i, 9}], {n, 0, 35}] (* Bruno Berselli, Feb 01 2013 *)