|
|
A100569
|
|
Number of labeled n-node oriented graphs without endpoints.
|
|
2
|
|
|
1, 1, 1, 9, 337, 37889, 11410545, 9368733289, 21760617258977, 146872848650637249, 2927557787922534645793, 173801937725990883065857673, 30857177979379449393077427767217, 16413568090264759380752395628891885377, 26177914283033566658965502231213434987939601
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,4
|
|
LINKS
|
|
|
FORMULA
|
E.g.f.: exp(x^2)*(Sum_{n >= 0} 3^(n*(n-1)/2)*(x/exp(2*x))^n/n!).
|
|
MATHEMATICA
|
m = 14;
egf = Exp[x^2]*Sum[3^(n (n - 1)/2)*(x/Exp[2 x])^n/n!, {n, 0, m}];
a[n_] := SeriesCoefficient[egf, {x, 0, n}]*n!;
|
|
PROG
|
(PARI) seq(n)={my(A=x/exp(2*x+O(x^n))); Vec(serlaplace(exp(x^2 + O(x*x^n)) * sum(k=0, n, 3^binomial(k, 2)*A^k/k!)))} \\ Andrew Howroyd, Sep 09 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|