The On-Line Encyclopedia of Integer Sequences (OEIS)

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

A364398

G.f. satisfies A(x) = 1 + x/A(x)^3*(1 + 1/A(x)).
(history; published version)

#30 by Andrew Howroyd at Sat Oct 21 11:08:52 EDT 2023

STATUS

reviewed

approved

#29 by Joerg Arndt at Sat Oct 21 09:58:06 EDT 2023

STATUS

proposed

reviewed

#28 by Stefano Spezia at Sat Oct 21 08:38:14 EDT 2023

STATUS

editing

proposed

#27 by Stefano Spezia at Sat Oct 21 08:26:50 EDT 2023

FORMULA

a(n) ~ c*(-1)^(n-1)*256^n*27^(-n)*2F1([1-n, 4*n], [3*n], -1)*n^(-13/2), with c = sqrt(3/(32*Pi)). - Stefano Spezia, Oct 21 2023

STATUS

proposed

editing

#26 by Stefano Spezia at Sat Oct 21 05:50:25 EDT 2023

STATUS

editing

proposed

#25 by Stefano Spezia at Sat Oct 21 05:50:02 EDT 2023

FORMULA

a(n) ~ c*(-1)^n*256^n*27^(-n)*2F1([1-n, 4*n], [3*n], -1)*n^(-1/2), with c = sqrt(3/(32*Pi)). - Stefano Spezia, Oct 21 2023

STATUS

approved

editing

#24 by Joerg Arndt at Sat Oct 21 05:36:24 EDT 2023

STATUS

proposed

approved

#23 by Joerg Arndt at Sat Oct 21 05:35:40 EDT 2023

STATUS

editing

proposed

#22 by Joerg Arndt at Sat Oct 21 05:35:38 EDT 2023

MATHEMATICA

nmax = 18; A[_] = 1; Do[A[x_] = 1+x/A[x]^3*(1+1/A[x]) + O[x]^(nmax+1) // Normal, {nmax}]; CoefficientList[A[x], x] (* _Jean-François Alcover, _, Oct 21 2023 *)

STATUS

reviewed

editing

#21 by Stefano Spezia at Sat Oct 21 05:10:06 EDT 2023

STATUS

proposed

reviewed