login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Concatenation of numbers k^k in increasing order up to the n-th and then in decreasing order.
0

%I #7 Jan 31 2024 18:12:42

%S 1,141,142741,14272562741,142725631252562741,

%T 142725631254665631252562741,14272563125466568235434665631252562741,

%U 1427256312546656823543167772168235434665631252562741

%N Concatenation of numbers k^k in increasing order up to the n-th and then in decreasing order.

%t 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 *)

%K easy,nonn,base

%O 1,2

%A _Amarnath Murthy_, Dec 25 2001

%E More terms from _Sascha Kurz_, Mar 23 2002