cp's OEIS Frontend

A134512 Row sums of triangle A134511.

%I A134512 #6 Mar 02 2018 17:36:35
%S A134512 1,1,3,4,10,14,32,46,99,145,299,444,887,1331,2595,3926,7508,11434,
%T A134512 21526,32960,61251,94211,173173,267384,486925,754309,1362627,2116936,
%U A134512 3797374,5914310,10543724,16458034,29180067,45638101,80521055,126159156,221610563,347769719,608468451,956238170,1667040776
%N A134512 Row sums of triangle A134511.
%H A134512 Robert Israel, <a href="/A134512/b134512.txt">Table of n, a(n) for n = 0..1999</a>
%F A134512 Empirical g.f.: (1-x^2)^2/((1+x-x^2)*(1-x-x^2)^2). - _Robert Israel_, Mar 02 2018
%e A134512 a(4) = 10 = sum of row 4 terms of triangle A134511: (5 + 0 + 4 + 0 + 1).
%p A134512 N:= 100: # for the first N terms
%p A134512 T128174:= Matrix(N, N, (i, j) -> `if`(j<=i, (i-j+1) mod 2, 0)):
%p A134512 T049310:= Matrix(N, N):
%p A134512 for i from 1 to N do
%p A134512      P:= orthopoly[U](i-1, x/2);
%p A134512      for j from 1 to i do
%p A134512        T049310[i, j]:= abs(coeff(P, x, j-1))
%p A134512      od
%p A134512 od:
%p A134512 convert(T049310 . (T128174 . Vector(N,1)),list); # _Robert Israel_, Mar 02 2018
%Y A134512 Cf. A134511.
%K A134512 nonn
%O A134512 0,3
%A A134512 _Gary W. Adamson_, Oct 28 2007
%E A134512 More terms from _Robert Israel_, Mar 02 2018