# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a049031 Showing 1-1 of 1 %I A049031 #10 Sep 30 2016 06:50:19 %S A049031 0,0,2,8,20,40,80,140,224,336,504,720,990,1320,1760,2288,2912,3640, %T A049031 4550,5600,6800,8160,9792,11628,13680,15960,18620,21560,24794,28336, %U A049031 32384,36800,41600,46800,52650,58968,65772,73080,81200,89900 %N A049031 Maximization of sums of cubes of integer differences (b_[ i ]-i)^3 over permutations {b_[ i ], for i-1,2,...,n} on first n integers. %H A049031 D. C. Blest, Optimising Sums of Cubes of Integer Differences, Math. Gaz., Vol. 84, No. 501 (Nov., 2000), pp. 509-513. %F A049031 a[ n ] = (Sum_{i=1}^{i=r} [ (n+1-2i)^3-(n-r)*r^3 ]) / 3 where r=floor((n+2)/4)). %F A049031 a(n) = r*(n-r+1)*(n-r)*(n-r-1)/3, where r = floor((n+1)/4). - _Vladeta Jovovic_, Dec 22 2004 %F A049031 G.f.: 2*x^3*(1+2*x+3*x^2+4*x^3+7*x^4+4*x^5+3*x^6+2*x^7+x^8)/((1+x)^3*(1+x^2)^3*(1-x)^5). - _Vladeta Jovovic_, Dec 22 2004 %t A049031 a[n_] := With[{r = Floor[(n+1)/4]}, r*(n-r+1)*(n-r)*(n-r-1)/3]; Array[a, 40] (* _Jean-François Alcover_, Sep 30 2016, after _Vladeta Jovovic_ *) %Y A049031 Cf. A049032. %K A049031 nonn,nice,easy %O A049031 1,3 %A A049031 David C Blest (D.Blest(AT)utas.edu.au) # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE