|
|
A316721
|
|
Expansion of Product_{k=1..9} (1+x^(2*k-1))/(1-x^(2*k)).
|
|
6
|
|
|
1, 1, 1, 2, 3, 4, 5, 7, 10, 13, 16, 21, 28, 35, 43, 55, 70, 86, 105, 129, 159, 193, 231, 279, 338, 403, 477, 568, 675, 795, 932, 1094, 1284, 1497, 1736, 2016, 2340, 2700, 3105, 3573, 4106, 4699, 5363, 6118, 6972, 7921, 8974, 10163, 11500, 12974, 14606, 16435, 18471
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,4
|
|
LINKS
|
|
|
MATHEMATICA
|
nmax=50; CoefficientList[Series[Product[(1 + x^(2 k - 1)) / (1 - x^(2 k)), {k, 1, 9}], {x, 0, nmax}], x] (* Vincenzo Librandi, Jul 12 2018 *)
|
|
PROG
|
(PARI) N=99; x='x+O('x^N); Vec(prod(k=1, 9, (1+x^(2*k-1))/(1-x^(2*k))))
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|