|
Search: id:A092364
|
|
|
| A092364 |
|
a(n)=n^2*binomial(n,2). |
|
+0 2
|
|
| 0, 4, 27, 96, 250, 540, 1029, 1792, 2916, 4500, 6655, 9504, 13182, 17836, 23625, 30720, 39304, 49572, 61731, 76000, 92610, 111804, 133837, 158976, 187500, 219700, 255879, 296352, 341446, 391500, 446865, 507904, 574992, 648516, 728875, 816480
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
Coefficient of x^2 in expansion of (1+nx)^n.
|
|
FORMULA
|
a(n)=n/2*(n+1)^3. Equals A085540/2 - Zerinvary Lajos (zerinvarylajos(AT)yahoo.com), May 09 2007
|
|
MAPLE
|
a:=n->sum(sum(stirling2(n+1, n), j=0..n), k=0..n): seq(a(n), n=0..35); - Zerinvary Lajos (zerinvarylajos(AT)yahoo.com), May 09 2007
a:=n->sum(sum(n^2/2, j=2..n), k=1..n): seq(a(n), n=1..36); - Zerinvary Lajos (zerinvarylajos(AT)yahoo.com), May 09 2007
a:=n->sum(k*sum(n, k=0..n-1), k=0..n-1):seq(a(n), n=1...36); - Zerinvary Lajos (zerinvarylajos(AT)yahoo.com), Aug 01 2008
a:=n->add(binomial(n, 2)+add(binomial(n, 2), j=2..n), j=1..n):seq(a(n), n=1..35); [From Zerinvary Lajos (zerinvarylajos(AT)yahoo.com), Aug 27 2008]
|
|
MATHEMATICA
|
f[n_]:=(n^4-n^3)/2; lst={}; Do[AppendTo[lst, f[n]], {n, 5!}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Dec 04 2009]
|
|
PROGRAM
|
(PARI) z(n)=n^2*binomial(n, 2); for(i=1, 40, print1(", "z(i)))
|
|
CROSSREFS
|
Sequence in context: A070600 A100488 A071174 this_sequence A071175 A063262 A156223
Adjacent sequences: A092361 A092362 A092363 this_sequence A092365 A092366 A092367
|
|
KEYWORD
|
nonn,new
|
|
AUTHOR
|
Jon Perry (perry(AT)globalnet.co.uk), Mar 19 2004
|
|
|
Search completed in 0.002 seconds
|