Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).
%I #20 Apr 10 2016 12:16:47
%S 2,2,9,3,8,4,8,5,7,7,2,8,5,2,5,8,9,2,4,5,7,8,8,6,7,3,3,5,5,8,0,8,1,9,
%T 3,8,2,2,5,1,9,5,4,1,5,2,6,6,1,2,1,0,3,4,6,2,5,0,7,2,3,9,3,6,7,2,9,1,
%U 8,3,5,1,4,8,9,5,9,7,5,6,2,6,4,4,6,3,6,4,4,4,7,3,7,4,1,7,6,5,5,4,8,4,2,9,5
%N Decimal expansion of the imaginary part of the Dirichlet function eta(z), at z=i, the imaginary unit.
%C The corresponding real part of eta(i) is in A271523.
%H Stanislav Sykora, <a href="/A271524/b271524.txt">Table of n, a(n) for n = 0..2000</a>
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/DirichletEtaFunction.html">Dirichlet Eta Function</a>
%F Equals imag(eta(i)).
%e 0.229384857728525892457886733558081938225195415266121034625072393...
%t First[RealDigits[Im[(1 - 2^(1 - I))*Zeta[I]], 10, 110]] (* _Robert Price_, Apr 09 2016 *)
%o (PARI) \\ The Dirichlet eta function (fails for z=1):
%o direta(z)=(1-2^(1-z))*zeta(z);
%o imag(direta(I))\\ Evaluation
%Y Cf. A002162 (eta(1)), A179311 (real(zeta(i))), A179836 (imag(-zeta(i))), A271523 (real(eta(i))), A271525 (real(eta'(i))), A271526(-imag(eta'(i))).
%K nonn,cons
%O 0,1
%A _Stanislav Sykora_, Apr 09 2016