OFFSET
0,3
COMMENTS
Original name: a simple grammar.
LINKS
Andrew Howroyd, Table of n, a(n) for n = 0..500
INRIA Algorithms Project, Encyclopedia of Combinatorial Structures 767
Bernhard Gittenberger, Emma Yu Jin, Michael Wallner, On the shape of random Pólya structures, arXiv:1707.02144 [math.CO], 2017, p. 20.
FORMULA
G.f.: 1/(1-g(x)) where g(x) is the g.f. of A004111. - Andrew Howroyd, Aug 09 2020
MAPLE
spec := [S, {C=Prod(B, Z), B=PowerSet(C), S=Sequence(C)}, unlabeled]: seq(combstruct[count](spec, size=n), n=0..20);
PROG
(PARI) WeighT(v)={Vec(exp(x*Ser(dirmul(v, vector(#v, n, (-1)^(n-1)/n))))-1, -#v)}
seq(n)={my(v=[]); for(n=1, n, v=concat([1], WeighT(v))); Vec(1/(1-x*Ser(v)))} \\ Andrew Howroyd, Aug 09 2020
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
encyclopedia(AT)pommard.inria.fr, Jan 25 2000
EXTENSIONS
More terms from Eric M. Schmidt, Dec 02 2017
Named changed by Andrew Howroyd, Aug 09 2020
STATUS
approved