The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A293022 (Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing all changes.

A293022

a(n) = n! * [x^n] exp(n*sinh(x)).
(history; published version)

#8 by N. J. A. Sloane at Fri Sep 29 20:35:56 EDT 2017

STATUS

proposed

approved

#7 by Robert Israel at Fri Sep 29 17:38:13 EDT 2017

STATUS

editing

proposed

#6 by Robert Israel at Fri Sep 29 17:38:04 EDT 2017

MAPLE

N:= 30: # to get a(0)..a(N)

S:= series(exp(n*sinh(x)), x, N+1):

seq(n!*coeff(S, x, n), n=0..N); # Robert Israel, Sep 29 2017

#5 by Robert Israel at Fri Sep 29 17:33:35 EDT 2017

LINKS

Robert Israel, <a href="/A293022/b293022.txt">Table of n, a(n) for n = 0..380</a>

STATUS

approved

editing

#4 by Susanna Cuyler at Fri Sep 29 07:20:14 EDT 2017

STATUS

proposed

approved

#3 by Ilya Gutkovskiy at Thu Sep 28 10:12:41 EDT 2017

STATUS

editing

proposed

#2 by Ilya Gutkovskiy at Thu Sep 28 10:00:30 EDT 2017

NAME

allocated for Ilya Gutkovskiy

a(n) = n! * [x^n] exp(n*sinh(x)).

DATA

1, 1, 4, 30, 320, 4380, 73152, 1443008, 32837632, 846829008, 24406425600, 777438110240, 27122380259328, 1028481186011968, 42119646804852736, 1852697321086064640, 87113569172046479360, 4360314205952755126528, 231474221309788621111296, 12990330117363343153415680

OFFSET

0,3

MATHEMATICA

Table[n! SeriesCoefficient[Exp[n Sinh[x]], {x, 0, n}], {n, 0, 19}]

CROSSREFS

Cf. A003724, A134200.

KEYWORD

allocated

nonn

AUTHOR

Ilya Gutkovskiy, Sep 28 2017

STATUS

approved

editing

#1 by Ilya Gutkovskiy at Thu Sep 28 10:00:30 EDT 2017

NAME

allocated for Ilya Gutkovskiy

KEYWORD

allocated

STATUS

approved