The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A266282 Triangle read by rows giving successive states of cellular automaton generated by "Rule 13" initiated with a single ON (black) cell. 7
 1, 0, 1, 0, 0, 0, 1, 0, 1, 1, 1, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 1, 1, 1, 1, 1, 0, 1, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 1, 1, 1, 1, 1 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0 COMMENTS Row n has length 2n+1. LINKS Robert Price, Table of n, a(n) for n = 0..9999 Eric Weisstein's World of Mathematics, Elementary Cellular Automaton Stephen Wolfram, A New Kind of Science, Wolfram Media, 2002; p. 55. EXAMPLE The first ten rows:                   1                 0 1 0               0 0 1 0 1             1 1 0 1 0 1 0           0 0 0 0 1 0 1 0 1         1 1 1 1 0 1 0 1 0 1 0       0 0 0 0 0 0 1 0 1 0 1 0 1     1 1 1 1 1 1 0 1 0 1 0 1 0 1 0   0 0 0 0 0 0 0 0 1 0 1 0 1 0 1 0 1 1 1 1 1 1 1 1 1 0 1 0 1 0 1 0 1 0 1 0 MATHEMATICA rule=13; rows=20; ca=CellularAutomaton[rule, {{1}, 0}, rows-1, {All, All}]; (* Start with single black cell *) catri=Table[Take[ca[[k]], {rows-k+1, rows+k-1}], {k, 1, rows}]; (* Truncated list of each row *) Flatten[catri] (* Triangle Representation of CA *) CROSSREFS Cf. A266283, A266284, A266840 (rows reversed). Sequence in context: A014789 A014669 A185276 * A228747 A285162 A074381 Adjacent sequences:  A266279 A266280 A266281 * A266283 A266284 A266285 KEYWORD nonn,tabf,easy AUTHOR Robert Price, Dec 26 2015 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified July 5 23:19 EDT 2022. Contains 355104 sequences. (Running on oeis4.)