A236857 Each n occurs the least common multiple (LCM) of {1, 2, ..., n} (= A003418(n)) times.
0, 1, 2, 2, 3, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6
Offset: 0
Examples
Can be viewed as an irregular table, where each row n (starting from row zero) contains A003418(n) copies of n: 0; 1; 2, 2; 3, 3, 3, 3, 3, 3; 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4; ...
Links
- Antti Karttunen, Rows 0..10 of the table, flattened
Programs
-
Mathematica
Join[{0},Flatten[Table[PadRight[{},LCM@@Range[n],{n}],{n,6}]]] (* Harvey P. Dale, Jul 29 2021 *)
Comments