login
A093590
Decimal expansion of the number x defined by x^x = 16.
7
2, 7, 4, 5, 3, 6, 8, 0, 2, 3, 5, 6, 7, 4, 6, 3, 4, 8, 4, 7, 0, 9, 8, 4, 9, 2, 8, 9, 5, 5, 1, 2, 0, 3, 8, 4, 4, 7, 1, 1, 0, 7, 7, 4, 8, 7, 7, 9, 2, 4, 1, 8, 0, 5, 3, 0, 6, 3, 1, 9, 9, 2, 5, 1, 3, 8, 9, 5, 2, 0, 4, 8, 2, 6, 5, 6, 7, 5, 9, 4, 1, 0, 6, 8, 4, 0, 5, 0, 4, 8, 9, 1, 0, 2, 1, 5, 4, 2, 6, 3, 9, 9, 5, 6, 2
OFFSET
1,1
COMMENTS
This is a kind of mean of 2 and 4 because 2^4 = 4^2 = 16.
LINKS
FORMULA
4*log(2)/LambertW(4*log(2)). - Vladeta Jovovic, Apr 11 2004
EXAMPLE
2.74536802356746348470984928955120384471107748779241805306319925138952048....
MATHEMATICA
RealDigits[ Log[16]/ProductLog[ Log[16]], 10, 111][[1]] (* Robert G. Wilson v, Apr 24 2004 *)
PROG
(PARI) { default(realprecision, 20080); x=solve(x=2, 3, x^x - 16); for (n=1, 20000, d=floor(x); x=(x-d)*10; write("b093590.txt", n, " ", d)); } \\ Harry J. Smith, Jun 19 2009
CROSSREFS
Sequence in context: A145433 A055200 A323755 * A065629 A049249 A336000
KEYWORD
nonn,cons
AUTHOR
David C. Smith (extra314(AT)hotmail.com), Apr 02 2004
STATUS
approved