[go: up one dir, main page]

login
A348466
a(0)=1; for n >= 0, a(n+1) is the concatenation of a(n) and a(n)-1.
0
1, 10, 109, 109108, 109108109107, 109108109107109108109106, 109108109107109108109106109108109107109108109105, 109108109107109108109106109108109107109108109105109108109107109108109106109108109107109108109104
OFFSET
0,2
MATHEMATICA
Nest[Append[#1, #2*10^IntegerLength[#3] + #3] & @@ {#, #[[-1]], #[[-1]] - 1} &, {1, 10}, 6] (* Michael De Vlieger, Oct 20 2021 *)
CROSSREFS
Suggested by A033564.
Sequence in context: A075508 A095176 A061749 * A280566 A280834 A281305
KEYWORD
nonn,base
AUTHOR
N. J. A. Sloane, Oct 20 2021
STATUS
approved