OFFSET
0,2
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..10
MAPLE
g():= seq(convert(n, base, 2)[1..10], n=1025..2047):
b:= proc(l) option remember;
`if`(l[1]=0, 1, add(b(sort(l-h)), h=g()))
end:
a:= n-> b([n$10]):
seq(a(n), n=0..5);
CROSSREFS
KEYWORD
nonn
AUTHOR
Alois P. Heinz, Oct 11 2015
STATUS
approved