A323983 Decimal expansion of sinh(Pi/6).
5, 4, 7, 8, 5, 3, 4, 7, 3, 8, 8, 8, 0, 3, 9, 8, 0, 8, 4, 7, 5, 7, 1, 5, 6, 4, 7, 7, 1, 7, 4, 3, 1, 4, 0, 3, 3, 5, 2, 7, 8, 3, 5, 2, 1, 7, 7, 5, 8, 6, 1, 7, 6, 1, 9, 9, 0, 8, 9, 5, 6, 3, 8, 2, 8, 7, 7, 3, 0, 0, 7, 7, 1, 6, 6, 1, 7, 2, 4, 3, 3, 5, 2, 9, 0, 8, 9, 2, 6, 4, 8, 7, 0, 8, 4, 7, 9, 7, 3, 2, 1, 2, 0, 7, 4, 0, 1, 1, 4, 5, 6
Offset: 0
Examples
0.5478534738880398084757156477174314033527835217758617619908956382877300771661...
Links
- Robert G. Wilson v, Table of n, a(n) for n = 0..1000
- H. S. Uhler, On the numerical value of i^i, Amer. Math. Monthly, 28 (1921), 114-116.
Programs
-
Mathematica
a[0] = a[1] = 1; a[n_] := ((n - 2)^2 + 1) a[n - 2]; t[x_] := N[(1/2)^x*a[x]/x!, 128]; RealDigits[Sum[t[x], {x, 1, 421, 2}], 10, 111][[1]] (* Robert G. Wilson v, Feb 16 2019 *) RealDigits[Sinh[Pi/6], 10, 120][[1]] (* Vaclav Kotesovec, Feb 16 2019 *)
Extensions
More digits from Robert G. Wilson v, Feb 16 2019
Simpler definition from Vaclav Kotesovec, Feb 16 2019
Comments