A107951 Continued fraction expansion of Boling's constant.

1, 1, 4, 6, 1, 1, 3, 1, 2, 5, 23, 3, 1, 1, 2, 1, 2, 1, 6, 2, 1, 5, 1, 12, 8, 2, 1, 1, 1, 4, 6, 1, 12, 6, 1, 1, 3, 1, 2, 2, 3, 1, 1, 1, 1, 25, 3, 2, 1, 1, 1, 3, 2, 1, 4, 3, 7, 36, 1, 3, 19, 1, 3, 11, 2, 7, 2, 4, 1, 6, 5, 20, 3, 1, 1, 4, 1, 84, 10, 4, 2, 1, 3, 3, 1, 1, 2, 1, 2, 1, 1, 1, 499, 2, 12, 1, 4, 857

Offset

1,3

Links

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

Mathematica

ContinuedFraction[ Sum[i(i + 1)/2/Product[i!/j!, {j, 0, i - 1}], {i, 20}]]

Crossrefs

Cf. A107950, A105658, A107952.

Sequence in context: A277755 A201402 A262562 * A019646 A238582 A154748

Adjacent sequences: A107948 A107949 A107950 * A107952 A107953 A107954

Keyword

cofr,nonn

Author

Robert G. Wilson v, May 28 2005

Status

approved