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.
%I A106624 #37 Sep 27 2022 08:44:29 %S A106624 1,0,2,1,4,3,8,7,16,15,32,31,64,63,128,127,256,255,512,511,1024,1023, %T A106624 2048,2047,4096,4095,8192,8191,16384,16383,32768,32767,65536,65535, %U A106624 131072,131071,262144,262143,524288,524287,1048576,1048575,2097152 %N A106624 Expansion of g.f.: (1 - x^2 + x^3)/((1-x^2)*(1-2*x^2)). %C A106624 Cumulative column frequency of occurrence of 0's and 1's iterated in a binary tree where each node in the tree holds a value of 0 or 1, beginning with a count of 1. %D A106624 Douglas Comer, Ubiquitous B-Tree, ACM Computing Surveys (CSUR), (1979), Volume 11 Issue 2. %D A106624 Huffman, D. A., A method for the construction of minimum redundancy codes, Proc. IRE 40 (1951), 1098-1101. %D A106624 Knuth, D. E., Dynamic Huffman coding. J. Algorithms 6 (1985), 163-180. %H A106624 Vincenzo Librandi, <a href="/A106624/b106624.txt">Table of n, a(n) for n = 0..5000</a> %H A106624 G. C. Barnes et al., <a href="https://doi.org/10.1145/1047124.1047408">Balanced sample Binary Trees</a>, ACM SIGCSE Bulletin, Volume 37 Issue 1, 2005 pp. 166-170. %H A106624 P. N. Fenwick, <a href="https://web.archive.org/web/20030522104516/http://www.cs.ubc.ca/local/reading/proceedings/spe91-95/spe/vol24/issue3/spe884.pdf">Cumulative Frequency</a>, Software: Practice and Experience, 1994. %H A106624 C. Witteveen, <a href="https://web.archive.org/web/20091122101853/http://pds.twi.tudelft.nl/vakken/in444/in4026-2.pdf">Balanced Binary Trees</a>, Slides. %H A106624 <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (0,3,0,-2). %F A106624 a(n) = 2^floor(n/2) + floor((-1)^n - 1)/2. - _N. J. A. Sloane_, May 15 2005 %p A106624 A106624 := proc(N) %p A106624 2^floor(n/2)+((-1)^n-1)/2 ; %p A106624 end proc: %p A106624 seq(A106624(n),n=0..20) ; # _R. J. Mathar_, Apr 14 2018 %t A106624 Table[2^Floor[n/2] +Floor[(-1)^n-1]/2, {n,0,50}] (* _G. C. Greubel_, Feb 19 2019 *) %o A106624 (Magma) [2^Floor(n/2) + Floor((-1)^n - 1)/2: n in [0..50]]; // _Vincenzo Librandi_, Aug 17 2011 %o A106624 (PARI) vector(50,n, n--; 2^floor(n/2) +floor((-1)^n-1)/2) \\ _G. C. Greubel_, Feb 19 2019 %o A106624 (Sage) [2^floor(n/2) +floor((-1)^n-1)/2 for n in (0..50)] # _G. C. Greubel_, Feb 19 2019 %Y A106624 Cf. A016116, A014535, A037026, A058518 - A058521, A000079 (bisection), A000225 (bisection). %K A106624 easy,nonn %O A106624 0,3 %A A106624 _Robert H Barbour_, May 10 2005 %E A106624 New definition from _N. J. A. Sloane_, May 15 2008 %E A106624 Edited by _N. J. A. Sloane_, Aug 29 2008 at the suggestion of _R. J. Mathar_