A322425 Start with (1, 2, 3, 4, 5); if the sequence has n terms, extend it by appending a(n) copies of a(1..n-1): cf. "Look to the left" sequence A293630.

1, 2, 3, 4, 5, 1, 2, 3, 4, 1, 2, 3, 4, 1, 2, 3, 4, 1, 2, 3, 4, 1, 2, 3, 4, 1, 2, 3, 4, 5, 1, 2, 3, 4, 1, 2, 3, 4, 1, 2, 3, 4, 1, 2, 3, 4, 1, 2, 3, 1, 2, 3, 4, 5, 1, 2, 3, 4, 1, 2, 3, 4, 1, 2, 3, 4, 1, 2, 3, 4, 1, 2, 3, 1, 2, 3, 4, 5, 1, 2, 3, 4, 1, 2, 3, 4, 1

Offset

1,2

Links

Iain Fox, Table of n, a(n) for n = 1..10000

Formula

Lim_{n->infinity} (a(1) + a(2) + ... + a(n))/n = 2.55182072...

Mathematica

Nest[Join[#, Flatten@ ConstantArray[Drop[#, -1], #[[-1]]] ] &, Range@ 5, 2] (* Michael De Vlieger, Dec 08 2018 *)

Prog

(PARI) gen(n, v=[1, 2, 3, 4, 5], w) = for(x=1, n, w=vector(#v-1, i, v[i]); for(y=1, v[#v], v=concat(v, w))); v

Crossrefs

"Look to the left" sequences: A293630 (seed 1,2), A322423 (seed 1,2,3), A322424 (seed 1,2,3,4).

Cf. A322426.

Sequence in context: A280502 A276757 A290397 * A053841 A010884 A339146

Adjacent sequences: A322422 A322423 A322424 * A322426 A322427 A322428

Keyword

nonn

Author

Iain Fox, Dec 07 2018

Extensions

Self-contained definition from M. F. Hasler, Dec 10 2018

Status

approved