cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-2 of 2 results.

A112361 Number of terms in s(n), where s(n) is defined in A114483.

Original entry on oeis.org

1, 2, 5, 8, 17, 35, 53, 107, 215, 323, 647, 971, 1943, 3887, 5831, 11663, 23327, 46655, 69983, 139967, 209951, 419903, 839807, 1259711, 2519423, 5038847, 7558271, 15116543, 22674815, 45349631, 90699263, 136048895, 272097791, 544195583
Offset: 1

Views

Author

Leroy Quet, Nov 30 2005

Keywords

Examples

			As defined in A114483, s(4) = {1,0,1,0,1,1,0,1}; so a(4) = 8.
		

Crossrefs

Extensions

Corrected and extended by Joshua Zucker, Jul 27 2006

A114482 Let S(1)=1, S(2)=10; S(2n)=concatenation of S(2n-1), S(2n-2) and 0; and S(2n+1)=concatenation of S(2n), S(2n) and 0. Sequence gives S(infinity).

Original entry on oeis.org

1, 0, 1, 0, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0, 1, 0, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0, 1, 0, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 1, 0, 0
Offset: 1

Views

Author

Leroy Quet, Nov 30 2005

Keywords

Comments

Number of terms in S(n) is A062318(n).
Interpreting S(n) in binary and converting to decimal gives 1,2,20,164,84296,43159880,5792821120672400,...,.

Examples

			S(3) = {1,0,1,0,0}, S(4) = {1,0,1,0,0,1,0,0}, S(5) = {1,0,1,0,0,1,0,0,1,0,1,0,0,1,0,0,0}, ...
		

Crossrefs

Programs

  • Mathematica
    a[1] = {1}; a[2] = {1, 0}; a[n_] := a[n] = If[EvenQ[n], Join[a[n - 1], a[n - 2], {0}] // Flatten, Join[a[n - 1], a[n - 1], {0}] // Flatten]; a[8] (* Robert G. Wilson v *)

Extensions

More terms from Robert G. Wilson v, Jan 01 2006
Edited by N. J. A. Sloane, Jan 03 2006
Showing 1-2 of 2 results.