|
%I #8 Apr 19 2014 14:42:15
%S 1,-1,-63,191,20097,-101761,-15684543,111220031,22790134017,
%T -207787349761,-53204224469823,592884985294271,182163814109323137,
%U -2399039130845535361,-859951431678305715903,13067637425459032590911,5353347164584370368979457
%N Numerator of Euler(n, 7/16).
%H Vincenzo Librandi, <a href="/A156527/b156527.txt">Table of n, a(n) for n = 0..200</a>
%F a(n) = (-8)^n*skp(n, 1/8), where skp(n,x) are the Swiss-Knife polynomials A153641. - Peter Luschny, Apr 19 2014
%t Numerator[EulerE[Range[0,20],7/16]] (* _Vincenzo Librandi_, May 05 2012 *)
%Y For denominators see A001025.
%K sign,frac
%O 0,3
%A _N. J. A. Sloane_, Nov 07 2009
|
