login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A066588 The sum of the digits of n^n. 10
1, 1, 4, 9, 13, 11, 27, 25, 37, 45, 1, 41, 54, 58, 52, 99, 88, 98, 108, 127, 31, 117, 148, 146, 153, 151, 154, 189, 163, 167, 63, 184, 205, 207, 214, 260, 270, 271, 265, 306, 112, 308, 315, 313, 325, 306, 352, 374, 333, 355, 151, 414, 412, 350, 378, 442, 391, 450 (list; graph; refs; listen; history; text; internal format)
OFFSET
0,3
LINKS
EXAMPLE
a(7) = 25 because 7^7 = 823543 and 8 + 2 + 3 + 5 + 4 + 3 = 25.
MAPLE
a:= n-> add(i, i=convert(n^n, base, 10)):
seq(a(n), n=0..60); # Alois P. Heinz, Oct 06 2023
MATHEMATICA
Table[Plus@@IntegerDigits@(n^n), {n, 80}] (* Vincenzo Librandi, Jun 18 2015 *)
PROG
(PARI) SumD(x)= { local(s=0); while (x>9, s+=x%10; x\=10); return(s + x) } { for (n=0, 1000, write("b066588.txt", n, " ", SumD(n^n)) ) } \\ Harry J. Smith, Mar 08 2010
(PARI) vector(100, n, sumdigits((n-1)^(n-1))) \\ Michel Marcus, Jun 18 2015
(Magma) [&+Intseq((n^n)): n in [0..80] ]; // Vincenzo Librandi, Jun 18 2015
CROSSREFS
Sequence in context: A197615 A125848 A225752 * A135740 A312870 A312871
KEYWORD
base,nonn
AUTHOR
Robert A. Stump (bee_ess107(AT)yahoo.com), Jan 07 2002
EXTENSIONS
More terms from Paolo P. Lava, May 15 2007
a(0)=1 inserted by Sean A. Irvine, Oct 06 2023
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified June 23 15:10 EDT 2024. Contains 373651 sequences. (Running on oeis4.)