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) ProdD(x)= { local(p=1); while (x>9 && p>0, p*=x%10; x\=10); return(p*x) } { for (n=0, 200, write("b067041.txt", n, " ", n^ProdD(n)) ) } \\ Harry J. Smith, Apr 30 2010
CROSSREFS
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