A156527 Numerator of Euler(n, 7/16).

1, -1, -63, 191, 20097, -101761, -15684543, 111220031, 22790134017, -207787349761, -53204224469823, 592884985294271, 182163814109323137, -2399039130845535361, -859951431678305715903, 13067637425459032590911, 5353347164584370368979457

Offset

0,3

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..200

Formula

a(n) = (-8)^n*skp(n, 1/8), where skp(n,x) are the Swiss-Knife polynomials A153641. - Peter Luschny, Apr 19 2014

Mathematica

Numerator[EulerE[Range[0, 20], 7/16]] (* Vincenzo Librandi, May 05 2012 *)

Crossrefs

For denominators see A001025.

Sequence in context: A045112 A255568 A143033 * A199850 A055811 A035329

Adjacent sequences: A156524 A156525 A156526 * A156528 A156529 A156530

Keyword

sign,frac

Author

N. J. A. Sloane, Nov 07 2009

Status

approved