OFFSET
0,3
LINKS
Andrew Howroyd, Table of n, a(n) for n = 0..1325
OEIS wiki, Lodumo transform
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
(PARI) \\ here S(n, k) is A047999.
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}
{ for(n=0, 10, print(row(n))) } \\ Andrew Howroyd, Feb 02 2020
CROSSREFS
KEYWORD
AUTHOR
Philippe Deléham, Apr 29 2009, May 02 2009
STATUS
approved