

A079210


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


41



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
(list;
graph;
refs;
listen;
history;
text;
internal format)



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



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

(PARI) tabf(nn) = for (n=0, nn, print(divisors(n!))); \\ Michel Marcus, Jun 19 2015


CROSSREFS



KEYWORD

nonn,tabf


AUTHOR

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


EXTENSIONS



STATUS

approved



