The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A066005 (Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing entries 1-10 | older changes

A066005

Sum of digits of 11^n.
(history; published version)

#14 by Alois P. Heinz at Fri Nov 01 18:06:05 EDT 2013

STATUS

editing

approved

#13 by Alois P. Heinz at Fri Nov 01 18:05:53 EDT 2013

LINKS

Harry J. Smith, <a href="/A066005/b066005.txt">Table of n, a(n) for n = 0,...,1000</a>

MATHEMATICA

Total/@(IntegerDigits/@(11^Range[0, 60])) (* From _Harvey P. Dale, _, Nov 02 2011 *)

PROG

(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) ) } [From __Harry J. Smith_, Nov 06 2009]

STATUS

proposed

editing

#12 by Michel Marcus at Fri Nov 01 17:01:30 EDT 2013

STATUS

editing

proposed

#11 by Michel Marcus at Fri Nov 01 17:01:18 EDT 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), this sequence (k=11), A066006 (k=12), A175527 (k=13).

STATUS

proposed

editing

#10 by Michel Marcus at Fri Nov 01 17:00:17 EDT 2013

STATUS

editing

proposed

#9 by Michel Marcus at Fri Nov 01 17:00:10 EDT 2013

FORMULA

a(n) = A007953(A001020(n)). - Michel Marcus, Nov 01 2013

PROG

(PARI) a(n) = sumdigits(11^n); \\ Michel Marcus, Nov 01 2013

STATUS

approved

editing

#8 by Russ Cox at Fri Mar 30 17:24:34 EDT 2012

PROG

(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) ) } [From _Harry J. Smith (hjsmithh(AT)sbcglobal.net), _, Nov 06 2009]

Discussion

Fri Mar 30

17:24

OEIS Server: https://oeis.org/edit/global/133

#7 by Russ Cox at Fri Mar 30 16:49:17 EDT 2012

AUTHOR

_N. J. A. Sloane (njas(AT)research.att.com), _, Dec 11 2001

Discussion

Fri Mar 30

16:49

OEIS Server: https://oeis.org/edit/global/110

#6 by Harvey P. Dale at Wed Nov 02 18:43:40 EDT 2011

STATUS

editing

approved

#5 by Harvey P. Dale at Wed Nov 02 18:43:37 EDT 2011

MATHEMATICA

Total/@(IntegerDigits/@(11^Range[0, 60])) (* From Harvey P. Dale, Nov 02 2011 *)

STATUS

approved

editing