|
| |
|
|
A097940
|
|
Sum of smallest parts (counted with multiplicity) of all compositions of n.
|
|
1
| |
|
|
1, 4, 8, 20, 37, 86, 173, 372, 788, 1680, 3550, 7554, 15994, 33820, 71374, 150376, 316151, 663474, 1389760, 2906116, 6066899, 12645608, 26318870, 54700044, 113536171, 235363832, 487342781, 1007969620, 2082597193, 4298660754
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
FORMULA
| G.f.: (1-x)^2*Sum(k*x^k/(1-x-x^k)^2, k=1..infinity).
|
|
|
MATHEMATICA
| Drop[ CoefficientList[ Series[(1 - x)^2*Sum[k*x^k/(1 - x - x^k)^2, {k, 50}], {x, 0, 30}], x], 1] (from Robert G. Wilson v Sep 08 2004)
|
|
|
CROSSREFS
| Cf. A046746, A092309.
Sequence in context: A053303 A097164 A133628 * A032280 A156303 A008136
Adjacent sequences: A097937 A097938 A097939 * A097941 A097942 A097943
|
|
|
KEYWORD
| easy,nonn
|
|
|
AUTHOR
| Vladeta Jovovic (vladeta(AT)eunet.rs), Sep 05 2004
|
|
|
EXTENSIONS
| More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Sep 08 2004
|
| |
|
|
