A383991
Series expansion of the exponential generating function exp(-tridend(-x)) - 1 where tridend(x) = (1 - 3*x - sqrt(1-6*x+x^2)) / (4*x) (A001003).
Original entry on oeis.org
0, 1, -5, 49, -743, 15421, -407909, 13135165, -498874991, 21838772377, -1082819193029, 59983280191561, -3671752681190615, 246130081055714389, -17932045676505509093, 1410893903131294766101, -119227840965746009631839, 10769985399394862863318705
Offset: 0
Cf.
A003725,
A097388,
A111884,
A112242,
A177885,
A318215,
A383987,
A383990,
A383992,
A383993,
A383994,
A383995.
-
nn = 19; f[x_] := Exp[x] - 1;
Range[0, nn]! * CoefficientList[Series[f[(1 + 3*x - Sqrt[1 + 6*x + x^2])/(4*x)], {x, 0, nn}], x]
A383995
Series expansion of the exponential generating function exp(ff6^!(x)) - 1 where ff6^!(x) = x * (1-3*x-x^2+x^3) / (1+3*x+x^2-x^3).
Original entry on oeis.org
0, 1, -11, 61, -215, -1559, 62941, -1371131, 26310481, -474554735, 7824076741, -98881279859, -176260664711, 87457412423161, -5077434546358355, 234510433823788501, -10016559114085864799, 413333665704129673249, -16704968283664639137899, 660340818239784197391325
Offset: 0
Cf.
A003725,
A097388,
A111884,
A112242,
A177885,
A318215,
A383989,
A383990,
A383991,
A383992,
A383993,
A383994.
-
nn = 19; f[x_] := Exp[x] - 1;
Range[0, nn]! * CoefficientList[Series[f[x*(1 - 3*x - x^2 + x^3)/(1 + 3*x + x^2 - x^3)], {x, 0, nn}], x]
A383992
Series expansion of the exponential generating function exp(arbustive(x)) - 1 where arbustive(x) = (log(1+x) - x^2) / (1+x).
Original entry on oeis.org
0, 1, -4, 3, 40, -330, 1626, -3150, -54592, 1060920, -13022280, 127171440, -889086648, -283184616, 179750627616, -4895777544840, 99124001788800, -1721513264431680, 25736021675994816, -292896125040673728, 639149345262276480, 106178474282318726400
Offset: 0
Cf.
A003725,
A097388,
A111884,
A112242,
A114285,
A177885,
A318215,
A383990,
A383991,
A383993,
A383994,
A383995.
-
nn = 21; f[x_] := Exp[x] - 1;
Range[0, nn]! * CoefficientList[Series[f[(Log[1 + x] - x^2)/(1 + x)], {x, 0, nn}], x]
A383993
Series expansion of the exponential generating function exp(tridup^!(x)) - 1 where tridup^!(x) = x / ((1+x) * (1+2*x)).
Original entry on oeis.org
0, 1, -5, 25, -119, 301, 5611, -171275, 3574705, -68597639, 1282415131, -23479249199, 409082338105, -6146707844315, 46462772999371, 2072826643602541, -160983324879816479, 8004468391727017585, -352443295329194182085, 14817357881274444545161
Offset: 0
Cf.
A002050,
A003725,
A097388,
A111884,
A112242,
A177885,
A318215,
A383990,
A383991,
A383992,
A383994,
A383995.
-
nn = 19; f[x_] := Exp[x] - 1;
Range[0, nn]! * CoefficientList[Series[f[x/((1 + x)*(1 + 2*x))], {x, 0, nn}], x]
A383994
Series expansion of the exponential generating function exp(wnp^!(x)) - 1 where wnp^!(x) = log(1+x) - x^2/(1+x).
Original entry on oeis.org
0, 1, -2, 0, 12, -60, 240, -840, 1680, 15120, -332640, 4656960, -59209920, 735134400, -9098369280, 112345833600, -1365274310400, 15746578848000, -155630893017600, 762963647846400, 22567767443020800, -1126188650069683200, 35900904478389350400
Offset: 0
Cf.
A003725,
A084099,
A097388,
A111884,
A112242,
A177885,
A318215,
A383990,
A383991,
A383992,
A383993,
A383995.
-
nn = 22; f[x_] := Exp[x] - 1;
Range[0, nn]! * CoefficientList[Series[f[Log[1 + x] - x^2/(1 + x)], {x, 0, nn}], x]
A383990
Series expansion of the exponential generating function exp(-dend(-x))-1 where dend(x) = (1 - sqrt(1+4*x)) / (2*x) + 1 (given by A000108).
Original entry on oeis.org
0, 1, -3, 19, -191, 2661, -47579, 1040047, -26888511, 802727209, -27178685459, 1029077910411, -43086906080063, 1976633329627789, -98597207392040811, 5313105048925173991, -307587436319162110079, 19038773384213189214417, -1254686724727364725716131
Offset: 0
Cf.
A003725,
A006531,
A097388,
A111884,
A112242,
A177885,
A318215,
A383991,
A383992,
A383993,
A383994,
A383995. Composition of exp(x)-1 with -
A000108(-x).
Showing 1-6 of 6 results.
Comments