Svoboda | Graniru | BBC Russia | Golosameriki | Facebook
login
A071051
Number of 1's in n-th row of triangle in A071035.
4
1, 3, 4, 7, 4, 8, 8, 15, 4, 8, 8, 16, 8, 16, 16, 31, 4, 8, 8, 16, 8, 16, 16, 32, 8, 16, 16, 32, 16, 32, 32, 63, 4, 8, 8, 16, 8, 16, 16, 32, 8, 16, 16, 32, 16, 32, 32, 64, 8, 16, 16, 32, 16, 32, 32, 64, 16, 32, 32, 64, 32, 64, 64, 127, 4, 8, 8, 16, 8, 16, 16, 32, 8, 16
OFFSET
0,2
COMMENTS
Number of ON cells at generation n of 1-D CA defined by Rule 126, starting with a single ON cell. - N. J. A. Sloane, Aug 09 2014
REFERENCES
S. Wolfram, A New Kind of Science, Wolfram Media, 2002; Chapter 3.
FORMULA
a(2n) = a(n)+A036987(n); a(2n+1) = a(n)+2*2^A000120(n). - Benoit Cloitre, Sep 22 2003
a(n) = 2^(1+wt(n)) unless n is of the form 2^i-1 in which case we must subtract 1, where wt = A000120. - N. J. A. Sloane, Aug 09 2014
G.f.: 2*Prod_{k=0..oo} (1+2*x^(2^k)) - Sum_k=0..oo} x^(2^k-1). - N. J. A. Sloane, Aug 09 2014
EXAMPLE
[Contribution from Omar E. Pol, Dec 11 2010] (Start)
May be arranged in blocks of sizes 1, 1, 2, 4, 8, 16, 32, ...:
1,
3,
4, 7,
4, 8, 8, 15,
4, 8, 8, 16, 8, 16, 16, 31,
4, 8, 8, 16, 8, 16, 16, 32, 8, 16, 16, 32, 16, 32, 32, 63,
Last terms of rows give positive terms of A000225.
(End)
MATHEMATICA
a[n_] := 2^(DigitCount[n, 2, 1]+1) - Boole[IntegerQ[Log[2, n+1]]];
Table[a[n], {n, 0, 100}] (* Jean-François Alcover, Oct 02 2018, from 2nd formula *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Hans Havermann, May 26 2002
STATUS
approved