A067040 a(n) = n^(sum of digits of n).

1, 1, 4, 27, 256, 3125, 46656, 823543, 16777216, 387420489, 10, 121, 1728, 28561, 537824, 11390625, 268435456, 6975757441, 198359290368, 6131066257801, 400, 9261, 234256, 6436343, 191102976, 6103515625, 208827064576, 7625597484987

Offset: 0

Author

Amarnath Murthy, Dec 29 2001

Keywords

• nonn
• base
• easy

Comments

Here 0^0 is taken to be 1. - Alonso del Arte, Sep 21 2019

Examples

			a(12) = 12^(1 + 2) = 12^3 = 1728.
a(13) = 13^(1 + 3) = 13^4 = 28561.
		

Links

• Harry J. Smith, Table of n, a(n) for n = 0..400

Crossrefs

Cf. A007953.

Programs

Maple

a:= n-> n^add(i,i=convert(n, base, 10)):
seq(a(n), n=0..30);  # Alois P. Heinz, Sep 21 2019

Mathematica

Table[n^(Plus@@IntegerDigits[n]), {n, 0, 99}] (* Alonso del Arte, Sep 14 2019 *)

PARI

a(n) = {n^sumdigits(n)} \\ Harry J. Smith, Apr 29 2010

Formula

a(n) = n^A007953(n).

a(n) = n only when n is a power of 10. - Alonso del Arte, Sep 21 2019

Extensions

More terms from Jason Earls, Jan 18 2002