A127627 Triangle T(n,k) = A054525(n,k)*A018804(k), read by rows 1<=k<=n.
1, -1, 3, -1, 0, 5, 0, -3, 0, 8, -1, 0, 0, 0, 9, 1, -3, -5, 0, 0, 15, -1, 0, 0, 0, 0, 0, 13, 0, 0, 0, -8, 0, 0, 0, 20, 0, 0, -5, 0, 0, 0, 0, 0, 21, 1, -3, 0, 0, -9, 0, 0, 0, 0, 27, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 21, 0, 3, 0, -8, 0, -15, 0, 0, 0, 0, 0, 40
Offset: 1
Examples
First few rows of the triangle are: 1; -1, 3; -1, 0, 5; 0, -3, 0, 8; -1, 0, 0, 0, 9; 1, -3,-5, 0, 0, 15; ...
Programs
-
Maple
A018804 := proc(n) sum(igcd(n, j), j=1..n): end proc: A127627 := proc(n,k) A054525(n,k)*A018804(k) ; end proc: # R. J. Mathar, Oct 21 2012