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

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, 1, 0, 8, 4, 2, 2, 1, 1, 1, 1, 0, 9, 4, 3, 2, 1, 1, 1, 1, 1, 0

Offset: 1

Author

Roger L. Bagula, Apr 26 2010

Keywords

• nonn
• tabl
• easy

Comments

A010766 augmented by trailing zeros.

Examples

			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, 1, 0;
8, 4, 2, 2, 1, 1, 1, 1, 0;
9, 4, 3, 2, 1, 1, 1, 1, 1, 0;
		

References

• F. S. Roberts, Applied Combinatorics, Prentice-Hall, 1984, p. 321.

Crossrefs

Cf. A006218 (row sums), A174557.

Programs

Maple

A176808 := proc(n,m)
    floor((n-1)/m) ;
end proc: # R. J. Mathar, Feb 18 2016

Mathematica

t[n_, m_] = Floor[(n - 1)/m];
Table[Table[t[n, m], {m, 1, n}], {n, 1, 10}];
Flatten[%]