A272192 Decimal expansion of the radius of convergence of the generating function of A000625 (alcohol stereoisomers enumeration).

3, 0, 4, 2, 1, 8, 4, 0, 9, 0, 7, 4, 6, 4, 6, 5, 1, 3, 0, 8, 1, 9, 0, 5, 8, 9, 3, 9, 4, 4, 2, 6, 3, 8, 1, 7, 5, 3, 4, 6, 7, 2, 3, 4, 9, 1, 4, 0, 9, 8, 5, 5, 2, 1, 2, 9, 0, 6, 7, 1, 2, 1, 8, 0, 0, 8, 0, 5, 4, 6, 1, 8, 9, 7, 0, 8, 3, 6, 2, 6, 1, 4, 4, 0, 1, 3, 7, 4, 3, 9, 9, 6, 2, 3, 1, 3, 2, 8, 4, 2, 8, 9

Offset

0,1

Comments

Data were computed from Vaclav Kotesovec's data in A239803.

References

Steven R. Finch, Mathematical Constants, Cambridge, 2003, Section 5.6., p. 301.

Links

Table of n, a(n) for n=0..101.

Formula

Equals 1 / A239803.

Example

0.304218409074646513081905893944263817534672349140985521290671218...

Mathematica

(* This approximation gives 9 correct digits: *)
For[A = 1 + x; m = 3, m <= 10, m++, A = 1 + x/3 (A^3 + 2 (Normal[A] /. x -> x^3)) + O[x]^m];
A = A // Normal;
S0[x_] = PadeApproximant[A, {x, 0, {3, 2}}];
sol = S /. Solve[S == 1 + x/3 (S^3 + 2 S0[x^3]), S];
r = x /. FindRoot[sol[[1]] == sol[[3]], {x, 1/3}] // Chop;
RealDigits[r][[1]]

Crossrefs

Cf. A000625, A239803.

Sequence in context: A324025 A081170 A201291 * A077150 A065453 A152770

Adjacent sequences: A272189 A272190 A272191 * A272193 A272194 A272195

Keyword

nonn,cons

Author

Jean-François Alcover, Apr 22 2016

Status

approved