Search: id:A099769
Results 1-1 of 1 results found.

%I A099769
%S A099769 9,2,4,2,9,9,8,9,7,2,2,2,9,3,8,8,5,5,9,5,9,5,7,0,1,8,1,3,5,9,5,9,0,0,5,
%T A099769 3,7,7,3,3,1,9,3,9,7,8,8,6,9,1,9,0,7,4,7,7,9,6,3,0,4,3,7,2,5,0,7,0,0,5,
%U A099769 4,1,7,1,1,4,3,4,6,8,9,7,9,8,9,9,1,3,4,7,6,6,4,9,4,6,9,1,9,5,3,5,7,4,1
%N A099769 Decimal expansion of Sum_{n >= 2} (-1)^n/log(n).
%C A099769 A slowly converging series. The reference gives several methods for evaluating 
               the sum.
%C A099769 Mathematica program derived from method #3 in the reference. - Ryan Propper 
               (rpropper(AT)stanford.edu), Sep 25 2006
%D A099769 R. E. Shafer (proposer), Problem 89-15, SIAM Rev., 32 (1990), 481-483.
%e A099769 0.924299897...
%t A099769 Do[X = 2*i; T = Table[Table[0, {X}], {X}]; For[n = 2, n <= X, n++, T[[n, 
               2]] = Sum[(-1)^k/Log[k], {k, 2, n}]]; For[k = 2, k <= X, k++, For[n 
               = 2, n <= X - k + 1, n++, T[[n, k+1]] = T[[n+1, k-1]] + 1/(T[[n+1, 
               k]] - T[[n, k]])]]; Print[N[T[[2, X]], 50]], {i, 50}] - Ryan Propper 
               (rpropper(AT)stanford.edu), Sep 25 2006
%o A099769 (PARI) sumalt(n=2,(-1)^n/log(n)) - Herman Jamke (hermanjamke(AT)fastmail.fm), 
               Apr 28 2007
%Y A099769 Sequence in context: A137197 A144981 A133841 this_sequence A020784 A111188 
               A089065
%Y A099769 Adjacent sequences: A099766 A099767 A099768 this_sequence A099770 A099771 
               A099772
%K A099769 nonn,cons
%O A099769 0,1
%A A099769 N. J. A. Sloane (njas(AT)research.att.com), Nov 11 2004
%E A099769 More terms from Ryan Propper (rpropper(AT)stanford.edu), Sep 25 2006
%E A099769 More terms from Herman Jamke (hermanjamke(AT)fastmail.fm), Apr 28 2007

Search completed in 0.001 seconds