This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A258880 E.g.f. satisfies: A(x) = Integral 1 + A(x)^3 dx. 11

%I

%S 1,6,540,184680,157600080,270419925600,816984611467200,

%T 3971317527112003200,29097143353353192480000,

%U 305823675529741700675520000,4435486895868663971869188480000,86036822683997062842122964537600000,2175352015640142857526698650779456000000

%N E.g.f. satisfies: A(x) = Integral 1 + A(x)^3 dx.

%C Note: Sum_{n>=0} (-1)^n*x^(3*n+1)/(3*n+1) = log( (1+x)/(1-x^3)^(1/3) )/2 + Pi*sqrt(3)/18 - atan( (1-2*x)*sqrt(3)/3 )*sqrt(3)/3.

%H Vaclav Kotesovec, <a href="/A258880/b258880.txt">Table of n, a(n) for n = 0..150</a>

%H Guo-Niu Han, Jing-Yi Liu, <a href="https://arxiv.org/abs/1707.08882">Divisibility properties of the tangent numbers and its generalizations</a>, arXiv:1707.08882 [math.CO], 2017. See Table for k = 3 p. 8.

%F E.g.f.: Series_Reversion( Integral 1/(1+x^3) dx ).

%F E.g.f.: Series_Reversion( Sum_{n>=0} (-1)^n * x^(3*n+1)/(3*n+1) ).

%F a(n) ~ 3^(15*n/2 + 17/4) * n^(3*n+1) / (exp(3*n) * (2*Pi)^(3*n+3/2)). - _Vaclav Kotesovec_, Jun 15 2015

%e E.g.f.: A(x) = x + 6*x^4/4! + 540*x^7/7! + 184680*x^10/10! + 157600080*x^13/13! + 270419925600*x^16/16! +...

%e where Series_Reversion(A(x)) = x - x^4/4 + x^7/7 - x^10/10 + x^13/13 - x^16/16 +...

%t terms = 13;

%t A[_] = 0;

%t Do[A[x_] = Integrate[1 + A[x]^3, x] + O[x]^k // Normal, {k, 1, 3 terms}];

%t DeleteCases[CoefficientList[A[x], x] Range[0, 3 terms - 2]!, 0] (* _Jean-François Alcover_, Jul 25 2018 *)

%o (PARI) {a(n) = local(A=x); A = serreverse( sum(m=0,n, (-1)^m * x^(3*m+1)/(3*m+1) ) +O(x^(3*n+2)) ); (3*n+1)!*polcoeff(A,3*n+1)}

%o for(n=0,20,print1(a(n),", "))

%o (PARI) /* E.g.f. A(x) = Integral 1 + A(x)^3 dx.: */

%o {a(n) = local(A=x); for(i=1,n+1, A = intformal( 1 + A^3 + O(x^(3*n+2)) )); (3*n+1)!*polcoeff(A,3*n+1)}

%o for(n=0,20,print1(a(n),", "))

%Y Cf. A000182, A000831, A258878, A258901, A258925, A258927, A259112, A259113, A258969.

%K nonn

%O 0,2

%A _Paul D. Hanna_, Jun 13 2015

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

Last modified October 23 20:44 EDT 2018. Contains 316530 sequences. (Running on oeis4.)