A188798 Expansion of Weierstrass sigma function where g2 = 0, g3 = 1/2.

1, -3, -54, 14904, 1506600, 2388991320, -3869879353920, -4031870972999040, -2165167367958199680, -98412959103275185776000, 400340096281866699127468800, 2867095983985997250950399692800, 20515582531363614789223090393804800, -111176909793416483402959193090747904000

Offset

0,2

Links

Nathaniel Johnston, Table of n, a(n) for n = 0..60

Formula

E.g.f.: sum(k>=0, a(k) * z^(6*k + 1) / (6*k + 1)! ) = sigma(z, 0, 1/2). - Michael Somos, Jun 10 2011

Row 0 of array in A188797.

Mathematica

a[ n_] := If[ n < 0, 0, With[ {m = 6 n + 1}, m! SeriesCoefficient[ WeierstrassSigma[ x, {0, 1/2}], {x, 0, m}]]]; (* Michael Somos, Jun 10 2011 *)

Crossrefs

Sequence in context: A156911 A214006 A154604 * A334248 A193256 A319038

Adjacent sequences: A188795 A188796 A188797 * A188799 A188800 A188801

Keyword

sign,easy

Author

N. J. A. Sloane, Apr 10 2011

Extensions

a(4) - a(13) from Nathaniel Johnston, Apr 11 2011

Status

approved