|
|
A294436
|
|
a(n) = Sum_{m=0..n} (Sum_{k=0..m} binomial(n,k))^5.
|
|
5
|
|
|
1, 33, 1268, 50600, 1972128, 75121312, 2803732096, 102885494016, 3722920064000, 133152625650176, 4715897847097344, 165643005814853632, 5776871664703455232, 200235592430802124800, 6903358709034568712192, 236882142098621090889728, 8094539021386254685569024
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
FORMULA
|
|
|
MAPLE
|
A:=proc(n, k) local j; add(binomial(n, j), j=0..k); end;
S:=proc(n, p) local i; global A; add(A(n, i)^p, i=0..n); end;
[seq(S(n, 5), n=0..30)];
|
|
MATHEMATICA
|
Table[Sum[Sum[Binomial[n, k], {k, 0, m}]^5, {m, 0, n}], {n, 0, 15}] (* Vaclav Kotesovec, Jun 07 2019 *)
|
|
PROG
|
(PARI) a(n) = sum(m=0, n, sum(k=0, m, binomial(n, k))^5); \\ Michel Marcus, Nov 18 2017
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|