



1, 3, 1, 5, 2, 1, 8, 4, 2, 1, 10, 5, 3, 2, 1, 14, 8, 5, 3, 2, 1, 16, 9, 6, 4, 3, 2, 1, 20, 12, 8, 6, 4, 3, 2, 1, 23, 14, 10, 7, 5, 4, 3, 2, 1, 27, 17, 12, 9, 7, 5, 4, 3, 2, 1
(list;
table;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,2


COMMENTS

Row sums = A024916: (1, 4, 8, 15, 21, 33, ...).
Left column = A006218: (1, 3, 5, 8, 10, 14, 16, ...).


LINKS

Table of n, a(n) for n=1..55.


FORMULA

A010766 * A000012 as infinite lower triangular matrices.
Triangle read by rows, partial row sums of A010766 starting fromt the right.


EXAMPLE

First few rows of the triangle:
1;
3, 1;
5, 2, 1;
8, 4, 2, 1;
10, 5, 3, 2, 1;
14, 8, 5, 3, 2, 1;
16, 9, 6, 4, 3, 2, 1;
...


MATHEMATICA

t = Table[Sum[Floor[n/h], {h, k, n}], {n, 0, 10}, {k, 1, n}];
u = Flatten[t] (* A134867 array *)
TableForm[t] (* A134867 sequence *)
(* Clark Kimberling, Oct 11 2014 *)


CROSSREFS

Cf. A010766, A006218, A024916.
Sequence in context: A100898 A101350 A199478 * A102573 A233940 A134033
Adjacent sequences: A134864 A134865 A134866 * A134868 A134869 A134870


KEYWORD

nonn,tabl


AUTHOR

Gary W. Adamson, Nov 14 2007


STATUS

approved



