|
|
|
|
0, 1, 3, 4, 6, 7, 9, 10, 17, 22, 29, 41, 64, 108, 188, 325, 547, 890, 1399, 2129, 3147, 4543, 6486, 9445, 14905, 27370, 59369, 142897, 353726, 860026, 2014744, 4523565, 9738843, 20157022, 40235827, 77701770, 145593150, 265384904
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
MATHEMATICA
|
t[n_, m_] := Binomial[n - m, n - Binomial[m, Floor[m/2]]]; Table[Sum[t[n, m], {m, 0, Floor[n/2]}], {n, 0, 50}] (* G. C. Greubel, Oct 15 2017 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|