A182501 Decimal expansion of log_Pi(phi), where phi is the golden ratio.
4, 2, 0, 3, 7, 1, 5, 0, 5, 1, 1, 0, 6, 0, 5, 0, 3, 8, 3, 6, 8, 3, 9, 7, 5, 6, 5, 7, 0, 7, 5, 3, 1, 0, 7, 4, 0, 6, 9, 9, 4, 4, 4, 2, 1, 8, 3, 5, 3, 8, 7, 1, 3, 0, 4, 0, 2, 5, 3, 6, 5, 6, 0, 5, 7, 4, 3, 3, 2, 1, 2, 0, 1, 1, 5, 4, 4, 2, 2, 1, 3, 9, 4, 9, 8, 5, 6, 9, 2, 4, 2, 9, 1, 9, 8, 0, 8, 1, 1, 8, 8, 2, 3, 0, 8, 8
Offset: 0
Examples
0.420371505110605038368397565707531074069944421835387...
Programs
-
Mathematica
RealDigits[Log[GoldenRatio]/Log[Pi], 10, 105][[1]]
-
PARI
localprec(100); log((1 + sqrt(5))/2)/log(Pi) \\ Michel Marcus, Jul 13 2021
Extensions
a(104) corrected by Georg Fischer, Jul 13 2021