[go: up one dir, main page]

login
A066006
Sum of digits of 12^n.
13
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,2
LINKS
FORMULA
a(n) = A007953(A001021(n)). - Michel Marcus, Nov 01 2013
MATHEMATICA
Table[Total[IntegerDigits[12^n]], {n, 0, 60}] (* Vincenzo Librandi, Oct 08 2013 *)
PROG
(PARI) SumD(x)= { local(s=0); while (x>9, s+=x%10; x\=10); return(s + x) } { for (n=0, 1000, a=SumD(12^n); write("b066006.txt", n, " ", a) ) } \\ Harry J. Smith, Nov 06 2009
(PARI) a(n) = sumdigits(12^n); \\ Michel Marcus, Nov 01 2013
CROSSREFS
Cf. sum of digits of k^n: A001370 (k=2), A004166 (k=3), A065713 (k=4), A066001 (k=5), A066002 (k=6), A066003(k=7), A066004 (k=8), A065999 (k=9), A066005 (k=11), this sequence (k=12), A175527 (k=13).
Sequence in context: A103162 A310331 A261952 * A323199 A360365 A310332
KEYWORD
nonn,base
AUTHOR
N. J. A. Sloane, Dec 11 2001
STATUS
approved