OFFSET
1,1
COMMENTS
Row sums are {1, 1, 2, 3, 2, 3, 4, 5, 4, 6, 5, ...}.
LINKS
G. C. Greubel, Rows n=1..100 of triangle, flattened
EXAMPLE
{1},
{0, 1},
{1, 0, 1},
{1, 0, 1, 1},
{0, 1, 0, 0, 1},
{0, 1, 0, 0, 1, 1},
{1, 0, 1, 1, 0, 0, 1},
{1, 0, 1, 1, 0, 0, 1, 1},
{0, 1, 0, 0, 1, 1, 0, 0, 1},
{1, 0, 1, 1, 0, 0, 1, 1, 0, 1},
{0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 1}
MATHEMATICA
Table[Table[1 - Mod[(Prime[n] - Prime[m])/2, 2], {m, 2, n}], {n, 2, 12}]; Flatten[%]
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
EXTENSIONS
Edited by N. J. A. Sloane, Sep 13 2008
STATUS
approved