A079210 Positive divisors of n!, listed in increasing order for each n, a new row for each n.

1, 1, 1, 2, 1, 2, 3, 6, 1, 2, 3, 4, 6, 8, 12, 24, 1, 2, 3, 4, 5, 6, 8, 10, 12, 15, 20, 24, 30, 40, 60, 120, 1, 2, 3, 4, 5, 6, 8, 9, 10, 12, 15, 16, 18, 20, 24, 30, 36, 40, 45, 48, 60, 72, 80, 90, 120, 144, 180, 240, 360, 720

Offset

0,4

Comments

Elements per row: 1,1,2,4,8,16,30,... (given by A027423, number of positive divisors of n!)

This sequence is the same as A070861 for the first 38 terms, but differs thereafter.

Links

Andrew Howroyd, Table of n, a(n) for n = 0..1979 (rows 0..12)

Example

First few rows are:
1;
1;
1,2;
1,2,3,6;
1,2,3,4,6,8,12,24;
1,2,3,4,5,6,8,10,12,15,20,24,30,40,60,120;
...

Mathematica

Flatten[Table[Divisors[n!], {n, 6}]]  (* Harvey P. Dale, Mar 13 2011 *)

Prog

(Magma) [Divisors(Factorial(n)): n in [0..10]]; // Vincenzo Librandi, Jun 19 2015
(PARI) tabf(nn) = for (n=0, nn, print(divisors(n!))); \\ Michel Marcus, Jun 19 2015

Crossrefs

Cf. A027423 (row lengths), A062569 (row sums), A070861.

Sequence in context: A057192 A078777 A135938 * A070861 A277566 A261144

Adjacent sequences: A079207 A079208 A079209 * A079211 A079212 A079213

Keyword

nonn,tabf

Author

Christian van den Bosch (cjb(AT)cjb.ie), Jan 03 2003

Extensions

a(0)=1 prepended by Andrew Howroyd, Jan 26 2022

Status

approved