|
| |
|
|
A146298
|
|
Difference between the cubes and 2*tetrahedral numbers; A000578(n) - 2*A000292(n).
|
|
1
|
|
|
|
0, -1, 0, 7, 24, 55, 104, 175, 272, 399, 560, 759, 1000, 1287, 1624, 2015, 2464, 2975, 3552, 4199, 4920, 5719, 6600, 7567, 8624, 9775, 11024, 12375, 13832, 15399, 17080
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0,4
|
|
|
COMMENTS
|
Can be visualized as layering a cube up from a corner. Eventually the series of triangular numbers is truncated. So 7 = 10-3 (the corners are removed), 24 = 15+15-3-3 and 55 = 21+28+21-3-9-3.
|
|
|
LINKS
|
Vincenzo Librandi, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (4,-6,4,-1).
|
|
|
FORMULA
|
a(n) = (n-2)*n*(2n+1)/3.
G.f.: x*(-1+4*x+x^2)/(1-x)^4. - R. J. Mathar, Oct 31 2008
a(n) = 4*a(n-1) - 6*a(n-2) + 4*a(n-3) - a(n-4). - Vincenzo Librandi, Jun 30 2012
|
|
|
EXAMPLE
|
a(4) = (4 - 2)*4*(2*4 + 1)/3 = 2*4*3 = 24.
|
|
|
MATHEMATICA
|
Table[(n-2)*n*(2*n+1)/3, {n, 0, 30}]
CoefficientList[Series[x*(-1+4*x+x^2)/(1-x)^4, {x, 0, 40}], x] (* Vincenzo Librandi, Jun 30 2012 *)
|
|
|
PROG
|
(Sage) taylor( mul( x*(x^2+4*x-1)/(x-1)^4 for i in range(1, 2)), x, 0, 30) # Zerinvary Lajos, Jun 03 2009
(MAGMA) A000578:=func<i | i^3>; A000292:=func<i | i*(i+1)*(i+2)/6>; [A000578(n)-2*A000292(n): n in [0..30]]; // Bruno Berselli, Apr 07 2011
|
|
|
CROSSREFS
|
Cf. A000292, A000578.
Sequence in context: A196116 A168668 A159225 * A079671 A212511 A100454
Adjacent sequences: A146295 A146296 A146297 * A146299 A146300 A146301
|
|
|
KEYWORD
|
sign,easy
|
|
|
AUTHOR
|
Jon Perry, Oct 29 2008
|
|
|
EXTENSIONS
|
Edited by Bruno Berselli, Apr 07 2011
|
|
|
STATUS
|
approved
|
| |
|
|
