A227336 Decimal expansion of Sum_{k>=1} exp(-k^2)/k.

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

Offset

0,1

Links

Table of n, a(n) for n=0..104.

Example

0.3770784253537429455054421613705422044050451917056787010476228998042...

Maple

sum(exp(-k^2)/k, k=1..infinity); evalf(%, 120);

Mathematica

digits = 105; NSum[1/(E^(k^2)*k), {k, 1, Infinity}, WorkingPrecision -> digits+1] // RealDigits[#, 10, digits]& // First (* Jean-François Alcover, Jan 28 2014 *)

Prog

(PARI) suminf(k=1, exp(-k^2)/k) \\ Charles R Greathouse IV, Jul 07 2013

Crossrefs

Sequence in context: A013564 A009467 A258982 * A373862 A353049 A288093

Adjacent sequences: A227333 A227334 A227335 * A227337 A227338 A227339

Keyword

nonn,cons

Author

Francesco Daddi, Jul 07 2013

Status

approved