login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A304961
Expansion of Product_{k>=1} (1 + 2^(k-1)*x^k).
37
1, 1, 2, 6, 12, 32, 72, 176, 384, 960, 2112, 4992, 11264, 26112, 58368, 136192, 301056, 688128, 1548288, 3489792, 7766016, 17596416, 38993920, 87293952, 194248704, 432537600, 957349888, 2132803584, 4699717632, 10406068224, 23001563136, 50683969536, 111434268672, 245819768832
OFFSET
0,3
COMMENTS
Number of compositions of partitions of n into distinct parts. a(3) = 6: 3, 21, 12, 111, 2|1, 11|1. - Alois P. Heinz, Sep 16 2019
Also the number of ways to split a composition of n into contiguous subsequences with strictly decreasing sums. - Gus Wiseman, Jul 13 2020
This sequence is obtained from the generalized Euler transform in A266964 by taking f(n) = -1, g(n) = (-1) * 2^(n-1). - Seiichi Manyama, Aug 22 2020
FORMULA
G.f.: Product_{k>=1} (1 + A011782(k)*x^k).
a(n) ~ 2^n * exp(2*sqrt(-polylog(2, -1/2)*n)) * (-polylog(2, -1/2))^(1/4) / (sqrt(6*Pi) * n^(3/4)). - Vaclav Kotesovec, Sep 19 2019
EXAMPLE
From Gus Wiseman, Jul 13 2020: (Start)
The a(0) = 1 through a(4) = 12 splittings:
() (1) (2) (3) (4)
(1,1) (1,2) (1,3)
(2,1) (2,2)
(1,1,1) (3,1)
(2),(1) (1,1,2)
(1,1),(1) (1,2,1)
(2,1,1)
(3),(1)
(1,1,1,1)
(1,2),(1)
(2,1),(1)
(1,1,1),(1)
(End)
MATHEMATICA
nmax = 33; CoefficientList[Series[Product[(1 + 2^(k - 1) x^k), {k, 1, nmax}], {x, 0, nmax}], x]
PROG
(PARI) N=40; x='x+O('x^N); Vec(prod(k=1, N, 1+2^(k-1)*x^k)) \\ Seiichi Manyama, Aug 22 2020
CROSSREFS
The non-strict version is A075900.
Starting with a reversed partition gives A323583.
Starting with a partition gives A336134.
Partitions of partitions are A001970.
Splittings with equal sums are A074854.
Splittings of compositions are A133494.
Splittings with distinct sums are A336127.
Sequence in context: A163087 A332654 A000650 * A032178 A102881 A360867
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, May 22 2018
STATUS
approved