|
|
A053731
|
|
a(n) = ceiling(binomial(n,8)/n).
|
|
4
|
|
|
0, 0, 0, 0, 0, 0, 0, 1, 1, 5, 15, 42, 99, 215, 429, 805, 1430, 2431, 3978, 6299, 9690, 14535, 21318, 30645, 43263, 60088, 82225, 111004, 148005, 195098, 254475, 328697, 420732, 534006, 672452, 840565, 1043460, 1286934, 1577532, 1922618
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,10
|
|
LINKS
|
|
|
MAPLE
|
seq(ceil(binomial(n, 8)/n), n=1..45); # G. C. Greubel, Sep 06 2019
|
|
MATHEMATICA
|
Table[Ceiling[Binomial[n, 8]/n], {n, 45}] (* G. C. Greubel, Sep 06 2019 *)
|
|
PROG
|
(PARI) vector(45, n, ceil(binomial(n, 8)/n)) \\ G. C. Greubel, Sep 06 2019
(Magma) [Ceiling(Binomial(n, 8)/n): n in [1..45]]; // G. C. Greubel, Sep 06 2019
(Sage) [ceil(binomial(n, 8)/n) for n in (1..45)] # G. C. Greubel, Sep 06 2019
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|