login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A086835 Second type of switched binary Batrachion of Conway and Hofstadter sequence. 0
1, 1, 2, 2, 4, 3, 4, 4, 8, 5, 5, 8, 8, 7, 8, 8, 16, 9, 7, 12, 15, 12, 9, 16, 16, 13, 12, 16, 24, 19, 12, 20, 23, 14, 23, 17, 19, 14, 28, 24, 24, 25, 16, 24, 39, 32, 12, 25, 35, 31, 20, 32, 38, 22, 39, 44, 17, 40, 32, 36, 40, 36, 21, 31, 38, 30, 43, 32, 32, 34, 47, 28, 52, 44, 21, 54 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,3

COMMENTS

Switches have starting positions and the initial condition affects the resulting chaos, so both sequences are important and the domains that result are different.

LINKS

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

FORMULA

Hc[n] =Hc[(n - Hc[n-1])*(Mod[n, 2])+Hc[n-1]*(1-Mod[n, 2])] + Hc[(n - Hc[n-2])*(Mod[n, 2])+(n-Hc[n-1])*(1-Mod[n, 2])]

MATHEMATICA

digits=200 Hc[n_Integer?Positive] := Hc[n] =Hc[(n - Hc[n-1])*(Mod[n, 2])+Hc[n-1]*(1-Mod[n, 2])] + Hc[(n - Hc[n-2])*(Mod[n, 2])+(n-Hc[n-1])*(1-Mod[n, 2])] Hc[1] = Hc[2] = 1 a1=Table[Hc[n], {n, 1, digits}]

CROSSREFS

Cf. A086335, A004001, A005185.

Sequence in context: A087874 A166267 A117484 * A046701 A140472 A109168

Adjacent sequences:  A086832 A086833 A086834 * A086836 A086837 A086838

KEYWORD

nonn,uned

AUTHOR

Roger L. Bagula, Sep 15 2003

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified February 25 14:40 EST 2021. Contains 341609 sequences. (Running on oeis4.)