cp's OEIS Frontend

A135608 Decimal expansion of Sum_{n>=2} 1/n^(n+1).

%I A135608 #14 Oct 23 2016 02:47:06
%S A135608 1,3,8,3,8,9,9,9,4,9,7,1,6,6,1,8,6,0,9,7,4,9,5,8,4,5,9,0,0,9,2,4,1,9,
%T A135608 0,2,9,7,7,9,2,8,4,0,1,5,3,6,6,0,0,0,8,2,5,8,2,2,8,2,1,4,5,2,8,5,3,3,
%U A135608 8,2,1,1,7,1,4,8,4,0,9,6,5,6,2,3,6,0,7,7,6,0,4,2,8,3,1,8,7,2,7,7
%N A135608 Decimal expansion of Sum_{n>=2} 1/n^(n+1).
%H A135608 G. C. Greubel, <a href="/A135608/b135608.txt">Table of n, a(n) for n = 0..1000</a>
%p A135608 P:=proc(n) local a,i; a:=0; for i from 1 by 1 to n do a:=a+i^(-i-1); print(evalf(a-1,101)); od; end: P(100);
%t A135608 digits = 100; NSum[1/(n^(n+1)), {n, 2, Infinity}, NSumTerms -> 100, WorkingPrecision -> digits+5] // RealDigits[#, 10, digits]& // First (* _Jean-François Alcover_, Feb 18 2014 *)
%o A135608 (PARI) suminf(n=2, 1/n^(n+1)) \\ _Michel Marcus_, Oct 23 2016
%Y A135608 Cf. A073009.
%K A135608 easy,nonn,cons
%O A135608 0,2
%A A135608 _Paolo P. Lava_ and _Giorgio Balzarotti_, Feb 27 2008
%E A135608 Lower summation index in definition corrected by _R. J. Mathar_, Jan 26 2009