A290693 Triangle read by rows, coefficients of the polynomials P(n, x) = A135517(n) *(Euler(n, x) - Euler(n, 1)).

0, -1, 1, 0, -1, 1, 1, 0, -3, 2, 0, 1, 0, -2, 1, -2, 0, 5, 0, -5, 2, 0, -3, 0, 5, 0, -3, 1, 17, 0, -42, 0, 35, 0, -14, 4, 0, 17, 0, -28, 0, 14, 0, -4, 1, -62, 0, 153, 0, -126, 0, 42, 0, -9, 2, 0, -155, 0, 255, 0, -126, 0, 30, 0, -5, 1

Offset: 0

Author

Peter Luschny, Aug 09 2017

Keywords

• sign
• tabl

Examples

			   0;
  -1,  1;
   0, -1,  1;
   1,  0, -3,  2;
   0,  1,  0, -2,  1;
  -2,  0,  5,  0, -5, 2;
		

Crossrefs

Cf. A135517.

Programs

Maple

c := n -> `if`(n=1 or n mod 2 = 0, 1, 2*c(iquo(n, 2))):
P := (n,x) -> (euler(n, x) - euler(n, 1))*c(n):
seq(seq(coeff(P(n,x), x, k), k=0..n), n=0..9);