%I #8 Oct 05 2015 03:00:47
%S 1,-2,1,-3,-2,-1,0,-3,2,-6,-5,0,3,12,-7,6,-5,0,18,14,3,-7,6,5,0,21,-6,
%T 36,0,-7,-6,30,0,-9,-72,55,0,0,7,-36,35,0,-108,-110,-9,10,0,0,42,-42,
%U -15,0,-165,18,-221,-11,10,0,0,49,18,-180,0,27,442,-373,0,-11,-10,0,0,-21,216,-275,0,663,746,-18
%N Eigentriangle by rows, A055615(n-k+1)*A144028(k-1); 1<=k<=n.
%C Row sums = A144028. Right border = A144028 shifted.
%C Left border = A055615, n*mu(n).
%C Sum of n-th row terms = rightmost term of next row.
%F Eigentriangle by rows, A055615(n-k+1)*A144028(k-1); 1<=k<=n.
%e First few rows of the triangle =
%e 1;
%e -2, 1;
%e -3, -2, -1;
%e 0, -3, 2, -6;
%e -5, 0, 3, 12, -7;
%e 6, -5, 0, 18, 14, 3;
%e -7, 6, 5, 0, 21, -6, 36;
%e 0, -7, -6, 30, 0, -9, -72, 55;
%e 0, 0, 7, -36, 35, 0, -108, -110, -9;
%e 10, 0, 0, 42, -42, -15, 0, -165, 18, -221;
%e ...
%e Row 4 = (0, -3, 2, -6) = termwise products of (0, -3, -2, 1) and (1, 1, -1, -6) = (0*1, -3*1, -2*-1, 1*(-6)). (0, -3, -2, 1) = the first 4 terms of A055615, n*mu(n), reversed.
%e (1, 1, -1, 6) = the first 4 terms A144028, shifted.
%p read("transforms");
%p A055615 := proc(n) n*numtheory[mobius](n) ; end proc:
%p A144028 :=proc(n) if n = 0 then 1; else L := [seq(A055615(i),i=1..n+2)] ; INVERT(L) ; op(n,%) ; end if; end proc:
%p A144029 := proc(n,k) A055615(n-k+1)*A144028(k-1) ; end proc: # _R. J. Mathar_, Jan 27 2011
%Y Cf. A055615, A144028.
%K tabl,sign
%O 1,2
%A _Gary W. Adamson_, Sep 07 2008
%E Entries corrected starting from row 10. - _R. J. Mathar_, Jan 27 2011