A182528 Decimal expansion of | log_gamma(i) |, where gamma is the Euler-Mascheroni constant and i is the imaginary unit.
2, 8, 5, 8, 3, 8, 7, 5, 4, 3, 3, 2, 6, 4, 2, 7, 7, 3, 1, 6, 8, 9, 6, 7, 5, 8, 4, 1, 1, 8, 0, 9, 0, 5, 4, 2, 0, 1, 6, 4, 0, 9, 3, 4, 7, 6, 5, 4, 7, 8, 7, 1, 0, 1, 3, 1, 6, 1, 4, 9, 4, 8, 3, 7, 4, 8, 2, 3, 2, 2, 7, 4, 9, 5, 5, 6, 5, 9, 9, 2, 2, 1, 9, 4, 7, 6, 0, 0, 1, 0, 6, 5, 0, 5, 4, 2, 5, 6, 0, 4, 9, 1, 0, 9, 6
Offset: 1
Examples
2.85838754332642773168967584118090542016409347654787...
Crossrefs
Cf. A001622.
Programs
-
Mathematica
RealDigits[ Im[ N[Log[I]/Log[EulerGamma], 105]]] [[1]]
Formula
Equals |Im(Log(i))/Log(A001622)|
Extensions
a(105) corrected by Sean A. Irvine, Jul 20 2021