A074201 Let b(1) = 1, b(2) = 2, b(n+2) = (b(n+1)+1)/(b(n)+1); then a(n) = 1 if b(n) >= 1 and a(n) = 0 otherwise (also a(n) = floor(b(n)) for n > 2).

1, 1, 1, 0, 0, 0, 1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 1, 1, 1, 0, 0, 1, 1, 1, 0, 0, 0, 1, 1, 0, 0, 0, 1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 1, 1, 1, 0, 0, 1, 1, 1, 0, 0, 1, 1, 1, 0, 0, 0, 1, 1, 0, 0, 0, 1, 1, 0, 0, 0, 1, 1

Offset

1

Comments

The associated sequence b(n) is 1, 2, 3/2, 5/6, 11/15, 52/55, 321/286, 3035/2781 etc. - R. J. Mathar, Apr 06 2008

1/2 <= b(n) <= 2 for all n. There are no substrings "1,0,1" or "0,1,0". - Max Alekseyev, Feb 16 2012

Links

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

Prog

(PARI) lista(nn) = {my(x=1, y=2, z); print1("1, 1"); for(n=1, nn, z=(y+1)/(x+1); x=y; y=z; print1(", ", floor(z))); } \\ Jinyuan Wang, Mar 05 2020

Crossrefs

Sequence in context: A266848 A068431 A266978 * A143466 A195053 A267136

Adjacent sequences: A074198 A074199 A074200 * A074202 A074203 A074204

Keyword

nonn,more

Author

Benoit Cloitre, Sep 17 2002

Extensions

More terms from R. J. Mathar, Apr 06 2008

a(54)-a(61) from Max Alekseyev, Apr 26 2010

a(62) from Max Alekseyev, Feb 16 2012

a(63)-a(70) from Jinyuan Wang, Mar 05 2020

Status

approved