A289003 Decimal expansion of the limiting ratio of consecutive terms of A288234.

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

Offset

1,2

Links

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

Example

1.755202484614384613489881050775533413444366653241137458292812482444...

Mathematica

z = 2000; r = -1 + Sqrt[7];
u = CoefficientList[Series[1/Sum[Floor[(k + 1)*r] (-x)^k, {k, 0, z}], {x, 0, z}], x];  (* A288234 *)
v = N[u[[z]]/u[[z - 1]], 200]
RealDigits[v, 10][[1]](* A289003 *)

Crossrefs

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

Sequence in context: A010510 A258042 A340710 * A295219 A138313 A138312

Adjacent sequences: A289000 A289001 A289002 * A289004 A289005 A289006

Keyword

nonn,cons,easy

Author

Clark Kimberling, Jul 14 2017

Status

approved