

A277758


The number of highly composite numbers between the factorials n! and (n+1)!.


2



1, 2, 2, 4, 4, 5, 7, 9, 9, 10, 10, 12, 10, 11, 12, 13, 13, 14, 12, 14, 12, 15, 15, 17, 15, 19, 19, 17, 19, 20, 21, 17, 24, 20, 20, 21, 22, 22, 20, 26, 26, 24, 26, 29, 27, 28, 26, 27, 27, 31, 28, 28, 28, 31, 29, 30, 30, 28, 29, 32, 32, 26, 26, 31, 28, 29, 28, 30, 34, 33, 34, 35, 34, 31, 37, 35, 35, 35, 37, 42, 39, 37, 40
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,2


COMMENTS

The interval is taken to be the halfopen interval [n!, (n+1)!).


LINKS



EXAMPLE

a(5) = 4 since the four highly composite numbers (A002182) in the interval [5!,6!) are 120, 180, 240, and 360.


MATHEMATICA

nn = 9; Table[Count[#, k_ /; n! <= k < (n + 1)!], {n, nn}] &[Block[{a = 0}, Reap[Do[b = DivisorSigma[0, k]; If[b > a, a = b; Sow[k]], {k, (nn + 1)!}]][[1, 1]]]] (* Michael De Vlieger, Oct 31 2016 *)


CROSSREFS



KEYWORD

nonn


AUTHOR



EXTENSIONS



STATUS

approved



