A066006 Sum of digits of 12^n.
1, 3, 9, 18, 18, 27, 45, 36, 54, 45, 45, 54, 54, 63, 81, 72, 90, 72, 81, 117, 108, 90, 99, 99, 117, 117, 135, 153, 135, 135, 153, 180, 153, 117, 117, 180, 171, 171, 189, 198, 216, 198, 225, 225, 216, 198, 225, 234, 252, 234, 216, 234, 279, 243
Offset: 0
Links
- Harry J. Smith, Table of n, a(n) for n = 0..1000
Crossrefs
Programs
-
Mathematica
Table[Total[IntegerDigits[12^n]], {n, 0, 60}] (* Vincenzo Librandi, Oct 08 2013 *)
-
PARI
a(n) = sumdigits(12^n); \\ Michel Marcus, Nov 01 2013