%I
%S 1,1,1,2,0,1,3,0,0,1,4,0,0,0,1,5,0,0,0,0,1,6,0,0,0,0,0,1,7,0,0,0,0,0,
%T 0,1,8,0,0,0,0,0,0,0,1,9,0,0,0,0,0,0,0,0,1,10,0,0,0,0,0,0,0,0,0,1,11,
%U 0,0,0,0,0,0,0,0,0,0,1,12,0,0,0,0,0,0,0,0,0,0,0,1,13,0,0,0,0,0,0,0,0,0,0,0
%N Triangle read by rows: row n (n>=0) ends with 1, and for n>=1 begins with n; other entries are zero.
%F T(n,k) = A145677(n,nk1). [From _R. J. Mathar_, Apr 01 2009]
%e Triangle begins:
%e 1
%e 1, 1
%e 2, 0, 1
%e 3, 0, 0, 1
%e 4, 0, 0, 0, 1
%e 5, 0, 0, 0, 0, 1
%e 6, 0, 0, 0, 0, 0, 1
%e 7, 0, 0, 0, 0, 0, 0, 1
%p A158821 := proc(n,k)
%p if n = k then
%p 1;
%p elif k = 0 then
%p n ;
%p else
%p 0 ;
%p end if;
%p end proc: # _R. J. Mathar_, Jan 08 2015
%K nonn,tabl,easy
%O 0,4
%A _Gary W. Adamson_, Mar 30 2008
