|
%I #10 Nov 01 2021 03:13:21
%S 0,-1,1,-2,1,1,-3,1,1,1,-4,1,1,1,1,-5,1,1,1,1,1,-6,1,1,1,1,1,1,-7,1,1,
%T 1,1,1,1,1,-8,1,1,1,1,1,1,1,1,-9,1,1,1,1,1,1,1,1,1,-10,1,1,1,1,1,1,1,
%U 1,1,1,-11,1,1,1,1,1,1,1,1,1,1,1,-12,1,1,1,1,1,1,1,1,1,1,1,1,-13,1,1,1,1,1
%N T(m,n) is -m if n=0, 1 elsewhere.
%C This triangle encodes a family of conditionally convergent series for the logarithm of positive integers, according to: log(m)=Sum_{n>0} T(m-1,n mod m)/n.
%C The second row of the triangle, m=1, corresponds to Mercator's series:
%C log(2)=1-1/2+1/3-1/4+1/5-1/6+-...
%e Triangle begins:
%e 0;
%e -1,1;
%e -2,1,1;
%e -3,1,1,1;
%e -4,1,1,1,1;
%e ...
%t Flatten[Table[{-n,Table[1,{n}]},{n,0,15}]] (* _Harvey P. Dale_, Apr 17 2015 *)
%Y Cf. A061347, A166711, A166871.
%K sign,tabl
%O 0,4
%A _Jaume Oliver Lafont_, Nov 03 2009, Nov 04 2009
%E Revised by _Jaume Oliver Lafont_, Nov 11 2009
|
