OFFSET
1,19
EXAMPLE
Triangle begins
0;
0, 0;
0, 1, 1;
0, 0, 0, 0;
0, 1, 1, 1, 1;
0, 0, 0, 2, 0, 2;
MATHEMATICA
Omega[n_] := If[n<2, 0, Plus@@Transpose[FactorInteger[n]][[2]]]; Flatten[Table[Mod[n, 2^Omega[k]], {n, 15}, {k, n}]]
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Juri-Stepan Gerasimov, Nov 30 2010
STATUS
approved