A107952 -id:A107952 - cp's OEIS frontend

A106643 Positions of the increasingly larger partial quotients in A107952.

1, 2, 3, 10, 45, 57, 77, 92, 97, 209, 215, 2423, 3849, 5289, 66555, 1347796, 1524713

Offset: 0

Robert G. Wilson v, May 31 2005

nonn

A107950 Boling's constant, the decimal expansion of Sum_{i>=1} i(i+1) / (2*Product_{j=0..i-1} i!/j!).

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

Offset: 1

Robert G. Wilson v, May 28 2005

			B=1.805917418986691013997505385851050680989652545909634282575958858...

Cf. A105658, A107951, A107952.

RealDigits[ Sum[i(i + 1)/2/Product[i!/j!, {j, 0, i - 1}], {i, 14}], 10, 111][[1]]
Clear[B]; B[m_] := B[m] = N[Sum[i*(1+i)/2*BarnesG[1+i]/i!^i, {i, 1, m}], 105]; m=2; While[B[m] != B[m-1], m++]; RealDigits[B[m]][[1]] (* Jean-François Alcover, Nov 18 2015 *)

A107951 Continued fraction expansion of Boling's constant.

Original entry on oeis.org

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: 0

Robert G. Wilson v, May 28 2005

Cf. A107950 (decimal expansion), A105658, A107952.

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

Offset changed by Andrew Howroyd, Aug 03 2024

cp's OEIS Frontend

A106643 Positions of the increasingly larger partial quotients in A107952.

Views

Author

Keywords

A107950 Boling's constant, the decimal expansion of Sum_{i>=1} i(i+1) / (2*Product_{j=0..i-1} i!/j!).

Views

Author

Keywords

Examples

Crossrefs

Programs

Mathematica

A107951 Continued fraction expansion of Boling's constant.

Views

Author

Keywords

Crossrefs

Programs

Mathematica

Extensions