|
%I #7 Jul 30 2015 22:18:32
%S 0,1,2,1,6,3,12,2,20,5,30,3,42,7,56,4,72,9,90,5,110,11,132,6,156,13,
%T 182,7,210,15,240,8,272,17,306,9,342,19,380,10,420,21,462,11,506,23,
%U 552,12,600,25,650,13,702,27,756,14,812,29,870,15,930,31,992,16,1056
%N Numerator of the mean deviation of a discrete uniform distribution on n elements.
%C 0, 1/2, 2/3, 1, 6/5, 3/2, 12/7, ...
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/UniformDistribution.html">Uniform Distribution</a>
%t Numerator[Table[If[OddQ[n], (n^2-1)/(4n), n/4], {n, 100}]]
%Y Cf. A086112.
%K nonn,easy,frac
%O 1,3
%A _Eric W. Weisstein_, Jul 10 2003
|
