Svoboda | Graniru | BBC Russia | Golosameriki | Facebook
login
A070951
Number of 0's in n-th row of triangle in A070950.
6
0, 0, 2, 1, 5, 2, 8, 3, 10, 7, 10, 9, 13, 8, 16, 9, 18, 16, 17, 15, 20, 20, 22, 19, 23, 24, 27, 22, 27, 25, 30, 24, 39, 28, 40, 25, 41, 31, 39, 34, 34, 42, 40, 38, 51, 36, 51, 44, 53, 46, 58, 44, 53, 47, 60, 46, 56, 55, 61, 50, 60, 53, 66, 49, 65, 75, 68, 66, 68, 72
OFFSET
0,3
COMMENTS
a(n) + A070952(n) = 2*n + 1. - Reinhard Zumkeller, Jun 07 2013
LINKS
MATHEMATICA
steps = 100; Count[#, 0]& /@ MapIndexed[ Take[#1, {steps - First[#2] + 2, steps + First[#2]}]&, CellularAutomaton[30, {{1}, 0}, steps]] (* Jean-François Alcover, Oct 07 2013 *)
PROG
(Haskell)
a070951 = length . filter (== 0) . a070950_row
-- Reinhard Zumkeller, Jun 06 2013
CROSSREFS
Sequence in context: A316891 A152992 A185727 * A076937 A014682 A167160
KEYWORD
nonn,easy,nice
AUTHOR
N. J. A. Sloane, May 19 2002
EXTENSIONS
More terms from Hans Havermann, May 26 2002
STATUS
approved