The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A277461

(Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing entries 1-10 | older changes

A277461

E.g.f.: sin(x)/(1+LambertW(-x)).
(history; published version)

#11 by Charles R Greathouse IV at Mon Jun 12 00:03:32 EDT 2017

STATUS

proposed

approved

#10 by Michel Marcus at Mon Jun 12 00:03:15 EDT 2017

STATUS

editing

proposed

#9 by Michel Marcus at Mon Jun 12 00:03:09 EDT 2017

PROG

(PARI) x = 'x + O('x^30); concat(0, Vec(serlaplace(sin(x)/(1+lambertw(-x))))) \\ Michel Marcus, Jun 12 2017

STATUS

proposed

editing

#8 by G. C. Greubel at Sun Jun 11 22:02:54 EDT 2017

STATUS

editing

proposed

#7 by G. C. Greubel at Sun Jun 11 22:02:44 EDT 2017

LINKS

G. C. Greubel, <a href="/A277461/b277461.txt">Table of n, a(n) for n = 0..385</a>

STATUS

approved

editing

#6 by Vaclav Kotesovec at Fri Oct 28 03:51:52 EDT 2016

STATUS

editing

approved

#5 by Vaclav Kotesovec at Fri Oct 28 03:51:30 EDT 2016

MATHEMATICA

Table[Sin[Pi*n/2] + Sum[Binomial[n, k] * Sin[Pi*(n-k)/2] * k^k, {k, 1, n}], {n, 0, 25}] (* Vaclav Kotesovec, Oct 28 2016 *)

STATUS

approved

editing

#4 by Vaclav Kotesovec at Sun Oct 16 18:01:17 EDT 2016

STATUS

editing

approved

#3 by Vaclav Kotesovec at Sun Oct 16 17:42:57 EDT 2016

NAME

allocated for Vaclav Kotesovec

E.g.f.: sin(x)/(1+LambertW(-x)).

DATA

0, 1, 2, 11, 104, 1241, 18216, 317715, 6414848, 147107953, 3776164000, 107253230171, 3339157316736, 113070818225353, 4137170839854976, 162653198951193059, 6837934005096620032, 306093463368534049761, 14535589272368159900160, 729835620496621069643179

OFFSET

0,3

FORMULA

a(n) ~ sin(exp(-1)) * n^n.

MATHEMATICA

CoefficientList[Series[Sin[x]/(1+LambertW[-x]), {x, 0, 25}], x] * Range[0, 25]!

CROSSREFS

Cf. A000312, A086331, A277462, A277463.

KEYWORD

allocated

nonn

AUTHOR

Vaclav Kotesovec, Oct 16 2016

STATUS

approved

editing

#2 by Vaclav Kotesovec at Sun Oct 16 17:36:24 EDT 2016

KEYWORD

allocating

allocated