OFFSET
1,1
FORMULA
EXAMPLE
First few rows of the triangle =
1;
0, 1;
0, 1, 1;
0, 1, 0, 1;
0, 1, 0, 1, 1;
0, 1, 0, 1, 0, 1;
0, 1, 0, 1, 0, 1, 1;
0, 1, 0, 1, 0, 1, 0, 1;
0, 1, 0, 1, 0, 1, 0, 1, 1;
0, 1, 0, 1, 0, 1, 0, 1, 0, 1;
0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 1;
0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1;
...
MATHEMATICA
rows = 10; ca = CellularAutomaton[28, {{1}, 0}, rows]; Table[ca[[k, 2 ;; k]], {k, 2, rows+1}] // Flatten (* Jean-François Alcover, Jul 12 2017 *)
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Gary W. Adamson, May 16 2010
STATUS
approved