|
| |
|
|
A066001
|
|
Sum of digits of 5^n.
|
|
8
| |
|
|
1, 5, 7, 8, 13, 11, 19, 23, 25, 26, 40, 38, 28, 23, 34, 44, 58, 56, 64, 59, 61, 62, 67, 74, 82, 77, 79, 89, 85, 83, 91, 104, 106, 89, 103, 92, 109, 104, 124, 134, 130, 137, 145, 149, 151, 116, 112, 128, 145, 158, 151, 152, 130, 119, 127, 167, 196
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,2
|
|
|
LINKS
| Harry J. Smith, Table of n, a(n) for n=0,...,1000
|
|
|
MATHEMATICA
| Table[Plus (AT)(AT) IntegerDigits[5^n], {n, 0, 60}] (* Robert G. Wilson v Oct 25 2006 *).
|
|
|
PROG
| (PARI) SumD(x)= { local(s=0); while (x>9, s+=x%10; x\=10); return(s + x) } { for (n=0, 1000, a=SumD(5^n); write("b066001.txt", n, " ", a) ) } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Nov 06 2009]
|
|
|
CROSSREFS
| Sequence in context: A173664 A171420 A047384 * A047477 A171952 A140237
Adjacent sequences: A065998 A065999 A066000 * A066002 A066003 A066004
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| N. J. A. Sloane (njas(AT)research.att.com), Dec 11 2001
|
| |
|
|
