|
|
A160019
|
|
Triangle: Lodumo_2 applied to each row of Pascal's triangle .
|
|
3
|
|
|
1, 1, 3, 1, 0, 3, 1, 3, 5, 7, 1, 0, 2, 4, 3, 1, 3, 0, 2, 5, 7, 1, 0, 3, 2, 5, 4, 7, 1, 3, 5, 7, 9, 11, 13, 15, 1, 0, 2, 4, 6, 8, 10, 12, 3, 1, 3, 0, 2, 4, 6, 8, 10, 5, 7, 1, 0, 3, 2, 4, 6, 8, 10, 5, 12, 7, 1, 3, 5, 7, 0, 2, 4, 6, 9, 11, 13, 15, 1, 0, 2, 4, 3, 6, 8, 10, 5, 12, 14, 16, 7
(list;
table;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
Triangle begins:
1;
1, 3;
1, 0, 3;
1, 3, 5, 7;
1, 0, 2, 4, 3;
1, 3, 0, 2, 5, 7; ...
|
|
PROG
|
S(n, k)={bitand(n-k, k)==0}
row(n)={my(v=vector(n+1), b=0); for(k=0, n, if(S(n, k), b++; v[1+k]=2*b-1, v[1+k]=2*(k-b))); v}
|
|
CROSSREFS
|
|
|
KEYWORD
|
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|