Search: id:A100106 Results 1-1 of 1 results found. %I A100106 %S A100106 5,9,7,5,4,2,6,1,7,5,2,6,9,3,3,8,7,4,7,6,8,6,3,2,6,0,1,9,6,8,8,2,8,9,7, %T A100106 7,5,8,7,4,3,3,1,9,9,3,1,8,9,8,0,4,9,3,1,7,5,7,7,0,9,2,6,2,4,1,2,7,5,9, %U A100106 1,8,8,5,1,0,8,3,6,4,1,2,7,8,7,4,4,9,8,8,4,9,2,9,6,6,5,8,9,6,5,2,6,5,3 %N A100106 Decimal expansion of Sum_{k>0} -(-1)^k / k!^(1/k). %C A100106 Very slow convergence! %p A100106 P:=proc(n) local a,i; a:=0; for i from 1 by 1 to n do a:=evalf(a+(-1)^(i-1)/ ((i!)^(1/i)),50); print(a); od; end: P(100000); %o A100106 (PARI) {a(n) = if( n<0, 0, n++; floor(sumalt(k=1, -(-1)^k/k!^(1/k)) * 10^n) % 10)} /* Michael Somos Mar 01 2008 */ %Y A100106 Sequence in context: A021630 A079459 A118309 this_sequence A125650 A140724 A086055 %Y A100106 Adjacent sequences: A100103 A100104 A100105 this_sequence A100107 A100108 A100109 %K A100106 cons,nonn %O A100106 0,1 %A A100106 Paolo P. Lava & Giorgio Balzarotti (ppl(AT)spl.at), Feb 14 2008 %E A100106 Definition corrected by Michael Somos, Mar 01 2008 Search completed in 0.001 seconds