A306045
Expansion of e.g.f. Product_{k>=1} (1 + (exp(x) - 1)^k) / (1 - (exp(x) - 1)^k).
Original entry on oeis.org
1, 2, 10, 74, 682, 7562, 98410, 1463114, 24367402, 449039882, 9069093610, 199050295754, 4713774570922, 119735740542602, 3246094020405610, 93519923311825994, 2852458136048627242, 91805618091515859722, 3108657616523130770410, 110453876295411957125834
Offset: 0
-
nmax = 20; CoefficientList[Series[Product[(1 + (Exp[x] - 1)^k) / (1 - (Exp[x] - 1)^k), {k, 1, nmax}], {x, 0, nmax}], x] * Range[0, nmax]!
A306081
Expansion of e.g.f. Product_{k>=1} ((1 + (exp(x) - 1)^k) / (1 - (exp(x) - 1)^k))^k.
Original entry on oeis.org
1, 2, 14, 134, 1574, 22262, 367814, 6907574, 144942854, 3357588662, 85000841414, 2331998188214, 68862337593734, 2176283210561462, 73250933670041414, 2614843434740912054, 98632371931151518214, 3918608865052986708662, 163507638190268814991814
Offset: 0
-
nmax = 20; CoefficientList[Series[Product[((1 + (Exp[x] - 1)^k)/(1 - (Exp[x] - 1)^k))^k, {k, 1, nmax}], {x, 0, nmax}], x] * Range[0, nmax]!
A330449
Expansion of e.g.f. Sum_{k>=1} (exp(x) - 1)^k / (k * (1 - (exp(x) - 1)^k)^2).
Original entry on oeis.org
1, 6, 36, 282, 2460, 25506, 299796, 3921882, 56977740, 913248786, 15917884356, 299358495882, 6066180049020, 131932872768066, 3057940695635316, 75151035318996282, 1954299203147952300, 53684552455571903346, 1553161560008013680676, 47162101103528811791082
Offset: 1
-
nmax = 20; CoefficientList[Series[Sum[(Exp[x] - 1)^k/(k (1 - (Exp[x] - 1)^k)^2), {k, 1, nmax}], {x, 0, nmax}], x] Range[0, nmax]! // Rest
Table[Sum[StirlingS2[n, k] (k - 1)! DivisorSigma[2, k], {k, 1, n}], {n, 1, 20}]
A306080
Expansion of e.g.f. Product_{k>=1} (1 + (exp(x) - 1)^k)^k.
Original entry on oeis.org
1, 1, 5, 43, 401, 4651, 64265, 1015603, 17996081, 354373531, 7682286425, 181466541763, 4632985312961, 127068851847211, 3724903637434985, 116185013450349523, 3840969677266089041, 134113334651486325691, 4930511086446971405945, 190327859758408148070883
Offset: 0
-
nmax = 20; CoefficientList[Series[Product[(1 + (Exp[x] - 1)^k)^k, {k, 1, nmax}], {x, 0, nmax}], x] * Range[0, nmax]!
Showing 1-4 of 4 results.
Comments