cp's OEIS Frontend

A176808 Triangle read by rows: T(n,m)=Floor[(n - 1)/m], 1<=m<=n.

%I A176808 #5 Feb 18 2016 14:33:50
%S A176808 0,1,0,2,1,0,3,1,1,0,4,2,1,1,0,5,2,1,1,1,0,6,3,2,1,1,1,0,7,3,2,1,1,1,
%T A176808 1,0,8,4,2,2,1,1,1,1,0,9,4,3,2,1,1,1,1,1,0
%N A176808 Triangle read by rows: T(n,m)=Floor[(n - 1)/m], 1<=m<=n.
%C A176808 A010766 augmented by trailing zeros.
%D A176808 F. S. Roberts, Applied Combinatorics, Prentice-Hall, 1984, p. 321.
%e A176808 0;
%e A176808 1, 0;
%e A176808 2, 1, 0;
%e A176808 3, 1, 1, 0;
%e A176808 4, 2, 1, 1, 0;
%e A176808 5, 2, 1, 1, 1, 0;
%e A176808 6, 3, 2, 1, 1, 1, 0;
%e A176808 7, 3, 2, 1, 1, 1, 1, 0;
%e A176808 8, 4, 2, 2, 1, 1, 1, 1, 0;
%e A176808 9, 4, 3, 2, 1, 1, 1, 1, 1, 0;
%p A176808 A176808 := proc(n,m)
%p A176808     floor((n-1)/m) ;
%p A176808 end proc: # _R. J. Mathar_, Feb 18 2016
%t A176808 t[n_, m_] = Floor[(n - 1)/m];
%t A176808 Table[Table[t[n, m], {m, 1, n}], {n, 1, 10}];
%t A176808 Flatten[%]
%Y A176808 Cf. A006218 (row sums), A174557.
%K A176808 nonn,tabl,easy
%O A176808 1,4
%A A176808 _Roger L. Bagula_, Apr 26 2010