This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A156205 #15 Apr 19 2014 14:41:04 %S A156205 1,-1,-15,47,1185,-6241,-230895,1704527,83860545,-796079041, %T A156205 -48942778575,567864586607,41893214676705,-574448847467041, %U A156205 -49441928730798255,782259922208550287,76946148390480577665,-1379749466246228538241,-152682246738275154625935 %N A156205 Numerator of Euler(n, 3/8). %H A156205 Vincenzo Librandi, <a href="/A156205/b156205.txt">Table of n, a(n) for n = 0..200</a> %F A156205 a(n) = (-1)^(n+1)*Re(2*I*(1+sum_{j=0..n}(binomial(n,j)*Li_{-j}(I)*4^j))). - _Peter Luschny_, Apr 29 2013 %F A156205 a(n) = (-4)^n*skp(n, 1/4), where skp(n,x) are the Swiss-Knife polynomials A153641. - _Peter Luschny_, Apr 19 2014 %p A156205 p := proc(n) local j; 2*I*(1+add(binomial(n,j)*polylog(-j,I)*4^j, j=0..n)) end: A156205 := n -> (-1)^(n+1)*Re(p(n)); %p A156205 seq(A156205(i),i=0..11); # _Peter Luschny_, Apr 29 2013 %t A156205 Numerator[EulerE[Range[0,20],3/8]] (* _Vincenzo Librandi_, May 04 2012 *) %Y A156205 For denominators see A001018. Cf. A000813. %K A156205 sign,frac %O A156205 0,3 %A A156205 _N. J. A. Sloane_, Nov 07 2009