cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A108124 Expansion of e.g.f. x/(1+sin(x)).

This page as a plain text file.
%I A108124 #39 Jan 19 2025 10:16:51
%S A108124 0,1,-2,6,-20,80,-366,1904,-11080,71424,-505210,3891712,-32433180,
%T A108124 290787328,-2791053734,28556359680,-310264194320,3567710830592,
%U A108124 -43287834157938,552688817143808,-7407423764750500,103981459115606016,-1525675236649033822,23354749389657604096
%N A108124 Expansion of e.g.f. x/(1+sin(x)).
%F A108124 E.g.f.: x/(1+sin(x)).
%F A108124 From _Sergei N. Gladkovskii_, May 29 2012: (Start)
%F A108124 Let E(x) be the e.g.f., then
%F A108124 E(x) = 1 - 1/(1+x)+ x^4/((1+x)*((1+x)*G(0) + x^2)) where G(k)= (2*k+2)*(2*k+3)-x^2+(2*k+2)*(2*k+3)*x^2/G(k+1); (continued fraction).
%F A108124 E(x) = 1 - 1/(1+x)+ x^4/((1+x)*((1+x)*G(0) + x^2)) where G(k)= 8*k+6-x^2/(1 + (2*k+2)*(2*k+3)/G(k+1)); (continued fraction).
%F A108124 E(x) = x/(1+x*G(0)) where G(k)= 1 - x^2/(2*(2*k+1)*(4*k+3) - 2*x^2*(2*k+1)*(4*k+3)/(x^2 - 4*(k+1)*(4*k+5)/G(k+1))); (continued fraction). (End)
%F A108124 E.g.f.: x/(1 + x*G(0)) where G(k) = 1 + x^2/( (2*k+1)*(2*k+3) - (2*k+1)*(2*k+3)^2/(2*k+3 - (2*k+2)/G(k+1))); (continued fraction). - _Sergei N. Gladkovskii_, Oct 01 2012
%t A108124 With[{nn=30},CoefficientList[Series[x/(1+Sin[x]),{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Oct 14 2014 *)
%o A108124 (Sage)
%o A108124 @CachedFunction
%o A108124 def c(n,k) :
%o A108124     if n==k: return 1
%o A108124     if k<1 or k>n: return 0
%o A108124     return ((n-k)//2+1)*c(n-1,k-1)+k*c(n-1,k+1)
%o A108124 def A108124(n): return (-1)^(n+1)*n*add(c(n,k) for k in (0..n))
%o A108124 [A108124(n) for n in (0..23)] # _Peter Luschny_, Jun 10 2014
%Y A108124 Cf. A186365.
%K A108124 sign
%O A108124 0,3
%A A108124 _Roger L. Bagula_, Jun 26 2005