OFFSET
1,1
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..1000
EXAMPLE
3.2426094109252482106020387...
MAPLE
evalf(sum(1/(log(n)^n), n=2..5000), 105);
MATHEMATICA
digits = 105; NSum[1/Log[n]^n, {n, 2, Infinity}, NSumTerms -> 2*digits, WorkingPrecision -> digits+1] // RealDigits[#, 10, digits] & // First (* Jean-François Alcover, Feb 21 2014 *)
PROG
(PARI) default(realprecision, 100); sum(k=2, 1000, 1/log(k)^k) \\ G. C. Greubel, Nov 20 2018
(Magma) SetDefaultRealField(RealField(100)); [(&+[1/Log(k)^k: k in [2..1000]])]; // G. C. Greubel, Nov 20 2018
(Sage) numerical_approx(sum(1/log(k)^k for k in [2..1000]), digits=100) # G. C. Greubel, Nov 20 2018
CROSSREFS
KEYWORD
AUTHOR
Mark Hudson (mrmarkhudson(AT)hotmail.com), Nov 02 2004
EXTENSIONS
Edited by N. J. A. Sloane, May 16 2008 at the suggestion of R. J. Mathar
STATUS
approved