A131234 Starts with 1, then n appears Fibonacci(n-1) times.

1, 2, 3, 4, 4, 5, 5, 5, 6, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 7, 7, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10

Offset

1,2

Comments

The largest nondecreasing sequence a(n) such that a(Fibonacci(n-1)) = n.

Links

Table of n, a(n) for n=1..88.

Mathematica

Flatten[{1, Table[Table[n, {Fibonacci[n - 1]}], {n, 10}]}]

Crossrefs

Cf. A072649 n occurs A000045(n) times.

Cf. A130233.

Partial sums of A010056.

Sequence in context: A030601 A049839 A130233 * A349983 A204924 A172006

Adjacent sequences: A131231 A131232 A131233 * A131235 A131236 A131237

Keyword

nonn

Author

Tanya Khovanova, Jun 20 2007

Status

approved