OFFSET
1,2
MATHEMATICA
Table[FromDigits[Join[Flatten[IntegerDigits/@Table[n^n, {n, k}]], Flatten[IntegerDigits/@Table[n^n, {n, k-1, 1, -1}]]]], {k, 10}] (* Harvey P. Dale, Jan 31 2024 *)
CROSSREFS
KEYWORD
easy,nonn,base
AUTHOR
Amarnath Murthy, Dec 25 2001
EXTENSIONS
More terms from Sascha Kurz, Mar 23 2002
STATUS
approved