A375798
Expansion of e.g.f. 1/(1 + (log(1 - x^2))/x).
Original entry on oeis.org
1, 1, 2, 9, 48, 340, 2820, 27720, 309120, 3897936, 54472320, 838918080, 14080651200, 256214724480, 5018771197440, 105361754097600, 2358985057228800, 56124276848640000, 1413738138502609920, 37591686093776855040, 1052149579611011481600
Offset: 0
-
my(N=30, x='x+O('x^N)); Vec(serlaplace(1/(1+log(1-x^2)/x)))
-
a(n) = n!*sum(k=0, n\2, (n-2*k)!*abs(stirling(n-k, n-2*k, 1))/(n-k)!);
A375809
Expansion of e.g.f. 1/(1 + (log(1 - x^3))/x^2)^3.
Original entry on oeis.org
1, 3, 12, 60, 396, 3240, 30960, 337680, 4152960, 56790720, 853675200, 13990838400, 248242579200, 4739385530880, 96860893409280, 2109714647040000, 48780176949504000, 1193187564259891200, 30781385655513292800, 835194405961256140800
Offset: 0
-
my(N=20, x='x+O('x^N)); Vec(serlaplace(1/(1+log(1-x^3)/x^2)^3))
-
a(n) = n!*sum(k=0, n\3, (n-3*k+2)!*abs(stirling(n-2*k, n-3*k, 1))/(n-2*k)!)/2;
A375808
Expansion of e.g.f. 1/(1 + (log(1 - x^3))/x^2)^2.
Original entry on oeis.org
1, 2, 6, 24, 144, 1080, 9360, 94080, 1078560, 13789440, 194745600, 3013718400, 50654419200, 918900702720, 17896250211840, 372338481715200, 8241399758592000, 193366506222489600, 4793430516921446400, 125181207625240166400, 3435031723216084992000
Offset: 0
-
my(N=30, x='x+O('x^N)); Vec(serlaplace(1/(1+log(1-x^3)/x^2)^2))
-
a(n) = n!*sum(k=0, n\3, (n-3*k+1)!*abs(stirling(n-2*k, n-3*k, 1))/(n-2*k)!);
Showing 1-3 of 3 results.