A137420 Continued fraction expansion of Sum_{n=1..infinity} (-1)^(n+1)/n^n = Integral_{x=0..1} x^(x) dx.
0, 1, 3, 1, 1, 1, 1, 1, 1, 2, 4, 7, 2, 1, 2, 1, 1, 1, 2, 1, 14, 1, 1, 2, 4, 1, 120, 1, 3, 1, 4, 1, 2, 6, 1, 1, 5, 1, 1, 5, 2, 1, 11, 2, 409, 1, 1, 7, 3, 2, 1, 11, 142, 1, 3, 1, 44, 1, 1, 27, 1, 3, 1, 1, 100, 1, 39, 14, 2, 16, 1, 1, 11, 1, 2, 29, 2, 1, 1, 1, 3, 4, 1, 1, 1, 12, 1, 1, 118, 7, 9, 1, 1, 6
Offset: 0
Links
- Wikipedia, Sophomore's dream.
Crossrefs
Cf. A083648 (decimal expansion).
Programs
-
Maple
sd1 := proc(n) local i, tren; tren := 0: for i from 1 to n do tren := (-1)^(i+1)*(1/i^(i)) + tren: od; RETURN(tren); end: numtheory[cfrac] (sd1(300),150,'quotients');
Extensions
Offset changed by Andrew Howroyd, Aug 03 2024