A067041 a(n) = n^(product of digits of n).

1, 1, 4, 27, 256, 3125, 46656, 823543, 16777216, 387420489, 1, 11, 144, 2197, 38416, 759375, 16777216, 410338673, 11019960576, 322687697779, 1, 441, 234256, 148035889, 110075314176, 95367431640625, 95428956661682176

Offset

0,3

Links

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

Example

a(12) = 12^(1*2) = 144.

Mathematica

Join[{1}, #^Times@@IntegerDigits[#]&/@Range[50]]  (* Harvey P. Dale, Mar 13 2011 *)

Prog

(PARI) a(n) = { n^vecprod(digits(n)) } \\ Harry J. Smith, Apr 30 2010

Crossrefs

Sequence in context: A045512 A055207 A214877 * A070691 A070834 A045503

Adjacent sequences: A067038 A067039 A067040 * A067042 A067043 A067044

Keyword

nonn,base,easy

Author

Amarnath Murthy, Dec 29 2001

Extensions

More terms from Jason Earls, Jan 13 2002

Offset changed from 1 to 0 by Harry J. Smith, Apr 30 2010

Status

approved