A288241 Decimal expansion of the limiting ratio of consecutive terms of A288231.

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

Offset

1,2

Links

Table of n, a(n) for n=1..86.

Example

1.9479484718847796710315570516902584529350253894155...

Mathematica

z = 2000; r = 4^(1/3);
u = CoefficientList[Series[1/Sum[Floor[(k + 1)*r] (-x)^k, {k, 0, z}], {x, 0, z}], x];  (* A288231 *)
v = N[u[[z]]/u[[z - 1]], 200]
RealDigits[v, 10][[1]](* A288241 *)

Crossrefs

Cf. A288231, A078140 (includes guide to related constants).

Sequence in context: A087017 A065466 A122790 * A199665 A113273 A011460

Adjacent sequences: A288238 A288239 A288240 * A288242 A288243 A288244

Keyword

nonn,cons,easy

Author

Clark Kimberling, Jul 11 2017

Status

approved