A055566 Sum of digits of n^5.
0, 1, 5, 9, 7, 11, 27, 22, 26, 27, 1, 14, 27, 25, 29, 36, 31, 35, 45, 37, 5, 18, 25, 29, 36, 40, 35, 36, 28, 23, 9, 34, 29, 36, 31, 35, 36, 46, 41, 36, 7, 29, 27, 31, 35, 36, 46, 32, 45, 43, 11, 27, 22, 44, 36, 37, 41, 36, 52, 47, 27, 40, 35, 45, 37, 32, 36, 25, 47, 36, 22, 35
Offset: 0
Examples
a(2) = 5 because 2^4 = 32 and 3+2 = 5. Trajectories under the map x->a(x): 1 ->1 ->1 ->1 ->1 ->1 ->1 ->1 ->1 ->.. 2 ->5 ->11 ->14 ->29 ->23 ->29 ->23 ->29 ->.. 3 ->9 ->27 ->36 ->36 ->36 ->36 ->36 ->36 ->.. 4 ->7 ->22 ->25 ->40 ->7 ->22 ->25 ->40 ->.. 5 ->11 ->14 ->29 ->23 ->29 ->23 ->29 ->23 ->.. 6 ->27 ->36 ->36 ->36 ->36 ->36 ->36 ->36 ->.. 7 ->22 ->25 ->40 ->7 ->22 ->25 ->40 ->7 ->..
Links
- Seiichi Manyama, Table of n, a(n) for n = 0..10000
Programs
-
Maple
read("transforms") : A055566 := proc(n) digsum(n^5) ; end proc: # R. J. Mathar, Jul 08 2012
-
Mathematica
Table[Total[IntegerDigits[n^5]],{n,0,80}] (* Harvey P. Dale, Feb 12 2023 *)
-
PARI
a(n) = sumdigits(n^5); \\ Seiichi Manyama, Nov 16 2021