cp's OEIS Frontend

A051160 Coefficients in expansion of (1-x)^floor(n/2)(1+x)^ceiling(n/2).

%I A051160 #39 Dec 06 2016 02:57:38
%S A051160 1,1,1,1,0,-1,1,1,-1,-1,1,0,-2,0,1,1,1,-2,-2,1,1,1,0,-3,0,3,0,-1,1,1,
%T A051160 -3,-3,3,3,-1,-1,1,0,-4,0,6,0,-4,0,1,1,1,-4,-4,6,6,-4,-4,1,1,1,0,-5,0,
%U A051160 10,0,-10,0,5,0,-1,1,1,-5,-5,10,10,-10,-10,5,5,-1,-1,1,0,-6,0,15,0,-20
%N A051160 Coefficients in expansion of (1-x)^floor(n/2)(1+x)^ceiling(n/2).
%C A051160 Triangle T(n,k), 0<=k<=n, read by rows given by: [1,0,-1,0,0,0,0,0,...]DELTA[1,-2,1,0,0,0,0,0,...] where DELTA is the operator defined in A084938. - _Philippe Deléham_, Sep 22 2008
%C A051160 The production matrix for this array has bivariate e.g.f. equal to exp(-t*x)*(1-t). - _Paul Barry_, Nov 22 2008
%C A051160 The elements of the matrix inverse are apparently T^(-1)(n,k) = (-1)^(n+k)*T(n,k). - _R. J. Mathar_, Apr 08 2013
%C A051160 Row sums give A130706. - _Philippe Deléham_, Oct 21 2013
%H A051160 E. Burlachenko, <a href="https://arxiv.org/abs/1612.00970">Fractal generalized Pascal matrices</a>, arXiv:1612.00970 [math.NT], 2016. See p. 3.
%F A051160 T(n, k) = -T(n-2, k-2) + T(n-2, k). T(0, 0) = T(1, 0) = T(1, 1) = 1.
%F A051160 T(n,k) = T(n-1,k) + (-1)^(n-1)*T(n-1,k-1), T(0,0)=1. - _Jose Ramon Real_, Nov 10 2007
%F A051160 G.f.: (1+x+x*y)/(1-x^2+x^2*y^2). - _Philippe Deléham_, Oct 21 2013
%e A051160 Triangle begins:
%e A051160   1;
%e A051160   1,  1;
%e A051160   1,  0, -1;
%e A051160   1,  1, -1, -1;
%e A051160   1,  0, -2,  0,  1;
%e A051160   1,  1, -2, -2,  1,  1;
%e A051160   ...
%p A051160 A051160 := proc(n,k)
%p A051160     (1-x)^floor(n/2)*(1+x)^ceil(n/2) ;
%p A051160     coeftayl(%,x=0,k) ;
%p A051160 end proc: # _R. J. Mathar_, Apr 08 2013
%t A051160 t[n_, k_] := Coefficient[(1-x)^Floor[n/2]*(1+x)^Ceiling[n/2], x, k]; Table[t[n, k], {n, 0, 12}, {k, 0, n}] // Flatten (* _Jean-François Alcover_, Jan 09 2014 *)
%o A051160 (PARI) {T(n, k) = polcoeff( (1 - x)^(n\2) * (1 + x)^ceil(n/2), k)}
%Y A051160 Cf. A007318, A051159(n, k) = (-1)^[ k/2 ]*T(n, k).
%K A051160 sign,tabl,easy
%O A051160 0,13
%A A051160 _Michael Somos_, Oct 14 1999