login
A066627
Concatenation of numbers k^k in increasing order up to the n-th and then in decreasing order.
0
1, 141, 142741, 14272562741, 142725631252562741, 142725631254665631252562741, 14272563125466568235434665631252562741, 1427256312546656823543167772168235434665631252562741
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
Sequence in context: A172904 A164525 A153358 * A172668 A172764 A172836
KEYWORD
easy,nonn,base
AUTHOR
Amarnath Murthy, Dec 25 2001
EXTENSIONS
More terms from Sascha Kurz, Mar 23 2002
STATUS
approved