A194055 - OEIS

The OEIS is supported by the many generous donors to the OEIS Foundation.

A194055

Natural fractal sequence of A000071 (Fibonacci numbers minus 1).

1, 1, 2, 1, 2, 3, 1, 2, 3, 4, 5, 1, 2, 3, 4, 5, 6, 7, 8, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,3

COMMENTS

See A194029 for definitions of natural fractal sequence and natural interspersion.

LINKS

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

MATHEMATICA

z = 50;

c[k_] := -1 + Fibonacci[k + 2]

c = Table[c[k], {k, 1, z}] (* A000071, F(n+2)-1 *)

f[n_] := If[MemberQ[c, n], 1, 1 + f[n - 1]]