A281586 E.g.f.: z*(((exp(z)+1)/((exp(z)+2*exp(-z/2)*cos(z*sqrt(3)/2))/3))-1).

0, 1, 2, 3, -4, -15, -54, 133, 792, 4293, -15130, -123849, -895212, 4101799, 42732522, 386103915, -2177360656, -27544520691, -298649804706, 1999963458217, 29765143177020, 376514568163377, -2919514870785766, -49968285360277437, -722370834074695896, 6365117686550339275

Offset

0,3

Links

Table of n, a(n) for n=0..25.

Maple

A281586_list := proc(len) z*(((exp(z)+1)/((exp(z)+2*exp(-z/2)* cos(z*sqrt(3)/2))/3))-1); series(%, z, len+1); seq(k!*coeff(%, z, k), k=0..len) end: A281586_list(20);

Prog

(SageMath) # uses[SIB from A281588]
A281586_list = lambda len: SIB(len, 3)
print(A281586_list(26))

Crossrefs

a(n) = A215064(n,1).

Sequence in context: A362639 A348628 A376584 * A365739 A217714 A076965

Adjacent sequences: A281583 A281584 A281585 * A281587 A281588 A281589

Keyword

sign

Author

Peter Luschny, Jan 25 2017

Status

approved