A226474 Central terms of triangles A226463 and A226464.

0, 0, 1, 0, 0, 0, 1, 1, 0, 0, 1, 1, 1, 0, 1, 0, 0, 1, 1, 0, 1, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 1, 0, 0, 0, 1, 0, 1, 0, 1, 0, 0, 1, 1, 1, 1, 0, 0, 1, 1, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 0, 1, 1, 1, 0, 1, 0, 1, 0, 0, 0

Offset

0

Comments

Central column of rule 135 and rule 149 1-D cellular automatons:

a(n) = A226463(n,n) = A226464(n,n).

Links

Reinhard Zumkeller, Table of n, a(n) for n = 0..10000

Eric Weisstein's World of Mathematics, Rule 30

Eric Weisstein's World of Mathematics, Elementary Cellular Automaton

Index entries for sequences related to cellular automata

Formula

a(n) = 1 - A051023(n).

Mathematica

A226474list[nmax_]:=CellularAutomaton[135, {{0}, 1}, {nmax, {{0}}}]; A226474list[200] (* Paolo Xausa, May 30 2023 *)

Prog

(Haskell)
a226474 = (1 -) . a051023

Crossrefs

Cf. A051023, A226463, A226464.

Sequence in context: A328979 A358227 A284524 * A309768 A080887 A099395

Adjacent sequences: A226471 A226472 A226473 * A226475 A226476 A226477

Keyword

nonn

Author

Reinhard Zumkeller, Jun 08 2013

Status

approved