The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A180623 Expansion of exp(x^2*cosec(x)). 0
 1, 1, 1, 4, 30, 320, 5400, 119040, 3432240, 125927424, 5594520960, 302070988800, 19179742982400, 1423835230371840, 121909715166919680, 11901225092146790400, 1316846634449778432000, 163453208505912970444800 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,4 LINKS Table of n, a(n) for n=1..18. Vladimir Kruchinin and D. V. Kruchinin, Composita and their properties, arXiv:1103.2582 [math.CO], 2011-2013. FORMULA B(x):=exp(x^2*cosec(x))=sum(n>=0, b(n)*x^n) b(n)=sum((if n=m then 1 else if oddp(n-m) then 0 else sum((-1)^k*(sum(binomial(k,j)*1/2^(j-1)*sum((-1)^((n-m)/2-i)*binomial(j,i)*(j-2*i)^(n-m+j)/(n-m+j)!,i,0,floor(j/2))*(-1)^(k-j),j,1,k))*binomial(k+m-1,m-1),k,1,n-m))/m!,m,1,n), a(n)=(n-1)!*n!*b(n), n>0; PROG (Maxima) a(n):=n!*(n-1)!*sum((if n=m then 1 else if oddp(n-m) then 0 else sum((-1)^k*(sum(binomial(k, j)*1/2^(j-1)*sum((-1)^((n-m)/2-i)*binomial(j, i)*(j-2*i)^(n-m+j)/(n-m+j)!, i, 0, floor(j/2))*(-1)^(k-j), j, 1, k))*binomial(k+m-1, m-1), k, 1, n-m))/m!, m, 1, n); CROSSREFS Sequence in context: A360766 A298244 A293191 * A128329 A211828 A277759 Adjacent sequences: A180620 A180621 A180622 * A180624 A180625 A180626 KEYWORD nonn AUTHOR Vladimir Kruchinin, Sep 13 2010 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified October 3 09:25 EDT 2023. Contains 365854 sequences. (Running on oeis4.)