OFFSET
1,3
EXAMPLE
The sequence of the numbers of divisors of the first 11 positive integers is: 1,2,2,3,2,4,2,4,3,4,2.
The maximum value obtained here is 4. There are three 4's among (d(1), d(2),...,d(11)); so a(11)=3.
MATHEMATICA
a = {}; b = {}; For[n = 1, n < 80, n++, AppendTo[b, Length[Divisors[n]]]; AppendTo[a, Length[Select[b, # == Max[b] &]]]]; a (* Stefan Steinerberger, May 18 2008 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, May 12 2008
EXTENSIONS
More terms from Stefan Steinerberger, May 18 2008
a(78)-a(105) from Ray Chandler, Jun 26 2009
STATUS
approved