OFFSET
1,2
MATHEMATICA
Table[FromDigits[Flatten[IntegerDigits[Range[n, 1, -1]^Range[n]]]], {n, 12}] (* Jayanta Basu, May 21 2013 *)
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Amarnath Murthy, Mar 04 2002
STATUS
approved