|
%I #10 Sep 29 2017 02:49:53
%S 1,3,19,109,881,7621,77785,854225,10750465,143737381,2121714761,
%T 33426065905,568250246305,10242445089605,197388381934801,
%U 4003553262384961,86010508861504385,1939950117886565125
%N Total number of all distinct list sizes in all partitions of [n] into lists, cf. A000262.
%H G. C. Greubel, <a href="/A132959/b132959.txt">Table of n, a(n) for n = 1..440</a>
%F E.g.f.: exp(x/(1-x))*Sum_{k>0}(1-exp(-x^k)).
%t Rest[ Range[0, 20]! CoefficientList[ Series[ Exp[x/(1 - x)] Sum[(-x)^k/(k!*(x^k - 1)), {k, 25}], {x, 0, 20}], x]] (* _Robert G. Wilson v_, Sep 13 2007 *)
%Y Cf. A052852, A132958, A132960, A132961, A132962, A132963.
%K easy,nonn
%O 1,2
%A _Vladeta Jovovic_, Sep 06 2007
%E More terms from _Robert G. Wilson v_, Sep 13 2007
|
