|
|
A052846
|
|
E.g.f.: (1-exp(x))*log(2-exp(x)).
|
|
0
|
|
|
0, 0, 2, 9, 40, 215, 1446, 11893, 115844, 1302099, 16568290, 235237937, 3684998208, 63113398543, 1173013230494, 23509415868141, 505358483764732, 11597234229683147, 282970077651917658, 7314780938223880105
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
COMMENTS
|
Previous name was: A simple grammar.
|
|
LINKS
|
|
|
FORMULA
|
E.g.f.: log(-1/(-2+exp(x)))*exp(x)-log(-1/(-2+exp(x)))
|
|
MAPLE
|
spec := [S, {B=Set(Z, 1 <= card), C=Cycle(B), S=Prod(B, C)}, labeled]: seq(combstruct[count](spec, size=n), n=0..20);
|
|
MATHEMATICA
|
CoefficientList[Series[(1-E^x) * Log[2-E^x], {x, 0, 20}], x]* Range[0, 20]! (* Vaclav Kotesovec, Sep 30 2013 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
encyclopedia(AT)pommard.inria.fr, Jan 25 2000
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|