A008218 Floor(n/4)*floor((n+1)/4)*floor((n+2)/4).

0, 0, 0, 0, 1, 1, 2, 4, 8, 8, 12, 18, 27, 27, 36, 48, 64, 64, 80, 100, 125, 125, 150, 180, 216, 216, 252, 294, 343, 343, 392, 448, 512, 512, 576, 648, 729, 729, 810, 900, 1000, 1000, 1100, 1210, 1331, 1331, 1452, 1584, 1728, 1728, 1872, 2028, 2197, 2197, 2366, 2548, 2744, 2744, 2940, 3150

Offset

0,7

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..1000

Formula

Empirical g.f.: x^4*(x^6+x^4+2*x^3+x^2+1) / ((x-1)^4*(x+1)^3*(x^2+1)^3). - Colin Barker, Mar 31 2013

Mathematica

Table[Floor[n/4]*Floor[(n + 1)/4] Floor[(n + 2)/4], {n, 0, 100}] (* Vincenzo Librandi, Oct 15 2013 *)

Prog

(PARI) a(n) = floor(n/4)*floor((n+1)/4)*floor((n+2)/4); /* Joerg Arndt, Mar 31 2013 */

Crossrefs

Sequence in context: A266575 A260514 A123263 * A073043 A083542 A181533

Adjacent sequences: A008215 A008216 A008217 * A008219 A008220 A008221

Keyword

nonn

Author

N. J. A. Sloane.

Status

approved