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,9

Links

Table of n, a(n) for n=0..65.

Example

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

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);

Crossrefs

Cf. A135517.

Sequence in context: A187130 A187145 A285700 * A131290 A138741 A116604

Adjacent sequences: A290690 A290691 A290692 * A290694 A290695 A290696

Keyword

sign,tabl

Author

Peter Luschny, Aug 09 2017

Status

approved