|
|
A307567
|
|
Expansion of e.g.f. Product_{j>=1} 1/(1 - (-1 + Product_{k>=1} 1/(1 - x^k/k!))^j/j!).
|
|
1
|
|
|
1, 1, 6, 47, 475, 5857, 85582, 1442814, 27569010, 588533169, 13880832378, 358407441163, 10054835359411, 304540419456509, 9904454527313548, 344267509478109266, 12736907296570957669, 499767123093151036603, 20730741476220960428814, 906482220845570488188348, 41675291255765161672107867
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
FORMULA
|
E.g.f.: g(g(x) - 1), where g(x) = e.g.f. of A005651.
|
|
MATHEMATICA
|
nmax = 20; CoefficientList[Series[Product[1/(1 - (-1 + Product[1/(1 - x^k/k!), {k, 1, nmax}])^j/j!), {j, 1, nmax}], {x, 0, nmax}], x] Range[0, nmax]!
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|