|
%I #14 Nov 01 2013 18:06:05
%S 1,2,4,8,16,14,28,38,40,53,43,41,55,47,76,71,88,86,82,83,94,71,97,95,
%T 118,101,112,125,124,140,145,137,139,143,178,140,172,200,184,188,205,
%U 203,190,164,175,215,196,248,190,218,265,251,223,230
%N Sum of digits of 11^n.
%H Harry J. Smith, <a href="/A066005/b066005.txt">Table of n, a(n) for n = 0..1000</a>
%F a(n) = A007953(A001020(n)). - _Michel Marcus_, Nov 01 2013
%t Total/@(IntegerDigits/@(11^Range[0,60])) (* _Harvey P. Dale_, Nov 02 2011 *)
%o (PARI) SumD(x)= { local(s=0); while (x>9, s+=x%10; x\=10); return(s + x) } { f=1; for (n=0, 1000, a=SumD(f); f*=11; write("b066005.txt", n, " ", a) ) } [_Harry J. Smith_, Nov 06 2009]
%o (PARI) a(n) = sumdigits(11^n); \\ _Michel Marcus_, Nov 01 2013
%Y 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), this sequence (k=11), A066006 (k=12), A175527 (k=13).
%K nonn,base
%O 0,2
%A _N. J. A. Sloane_, Dec 11 2001
|
