A357649
Expansion of e.g.f. cosh( (exp(3*x) - 1)/3 ).
Original entry on oeis.org
1, 0, 1, 9, 64, 435, 3097, 24822, 232759, 2517345, 30070954, 382827225, 5110770205, 71421582024, 1049487311485, 16286699945853, 267145966335088, 4616924929100535, 83622792656855125, 1578916985654901366, 30957723637379211115, 628927539690331202661
Offset: 0
-
With[{m = 20}, Range[0, m]! * CoefficientList[Series[Cosh[(Exp[3*x] - 1)/3], {x, 0, m}], x]] (* Amiram Eldar, Oct 07 2022 *)
-
my(N=30, x='x+O('x^N)); Vec(serlaplace(cosh((exp(3*x)-1)/3)))
-
a(n) = sum(k=0, n\2, 3^(n-2*k)*stirling(n, 2*k, 2));
A357650
Expansion of e.g.f. cosh( (exp(4*x) - 1)/4 ).
Original entry on oeis.org
1, 0, 1, 12, 113, 1000, 8977, 86996, 959905, 12303888, 179038689, 2840696540, 47684181393, 835731314808, 15277172343409, 292597596283684, 5900038421042753, 125488177929542944, 2809541905807203009, 65903118624174027436, 1610968753088423886257
Offset: 0
-
With[{m = 20}, Range[0, m]! * CoefficientList[Series[Cosh[(Exp[4*x] - 1)/4], {x, 0, m}], x]] (* Amiram Eldar, Oct 07 2022 *)
-
my(N=30, x='x+O('x^N)); Vec(serlaplace(cosh((exp(4*x)-1)/4)))
-
a(n) = sum(k=0, n\2, 4^(n-2*k)*stirling(n, 2*k, 2));
A357661
Expansion of e.g.f. cosh( (exp(2*x) - 1)/sqrt(2) ).
Original entry on oeis.org
1, 0, 2, 12, 60, 320, 2040, 15568, 133648, 1230336, 11962400, 123144384, 1349008320, 15731096576, 194349866880, 2527082917120, 34392647418112, 488243791183872, 7216792525799936, 110936087161801728, 1771199461131500544, 29324602146652307456
Offset: 0
-
With[{nn=30},CoefficientList[Series[Cosh[(Exp[2x]-1)/Sqrt[2]],{x,0,nn}],x] Range[0,nn]!] (* Harvey P. Dale, Mar 23 2025 *)
-
my(N=30, x='x+O('x^N)); apply(round, Vec(serlaplace(cosh((exp(2*x)-1)/sqrt(2)))))
-
a(n) = sum(k=0, n\2, 2^(n-k)*stirling(n, 2*k, 2));
Showing 1-3 of 3 results.