OFFSET
2,4
EXAMPLE
The divisors of 9 partition the closed interval [0,9] into subintervals [0,1), [1,3), [3,9], with lengths 1, 2, 6, respectively. The variance of these lengths has integer part = 3. Hence a(9) = 3.
MATHEMATICA
<< Statistics`DescriptiveStatistics` f[n_] := Module[{d, l, a, i}, d = Divisors[n]; l = Length[d]; a = {1}; For[i = 1, i <= l - 1, i++, a = Append[a, d[[i + 1]] - d[[i]]]]; a]; Table[Floor[Variance[f[i]]], {i, 2, 100}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Joseph L. Pe, Dec 19 2002
STATUS
approved