A173169 - OEIS

A173169

Decimal expansion of the solution x to x^x = A, the Glaisher-Kinkelin constant (A074962).

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

(list; constant; graph; refs; listen; history; text; internal format)

OFFSET

1,2

LINKS

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

EXAMPLE

1.22512630432118191..^1.22512630432118191.. = 1.28242712910062263687534256886979..

MATHEMATICA

x=Glaisher; RealDigits[Log[x]/ProductLog[Log[x]], 10, 4*5! ][[1]]

PROG

(PARI) (x->x/lambertw(x))(1/12-zeta'(-1)) \\ Charles R Greathouse IV, Dec 12 2013

CROSSREFS