|
|
A323751
|
|
a(n) = Product_{k=0..n} (k^n + (n-k)^n).
|
|
2
|
|
|
2, 1, 32, 59049, 14101250048, 775913238525390625, 13410804447068120796679372800, 112244673425189306235795780017831813874289, 545831702006800417886454373052629612732034857946832699392
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
Table[Product[k^n+(n-k)^n, {k, 0, n}], {n, 0, 10}] (* G. C. Greubel, Feb 08 2019 *)
|
|
PROG
|
(PARI) {a(n) = prod(k=0, n, k^n+(n-k)^n)}
(Magma) [(&*[k^n +(n-k)^n: k in [0..n]]): n in [0..10]]; // G. C. Greubel, Feb 08 2019
(Sage) [product(k^n +(n-k)^n for k in (0..n)) for n in (0..10)] # G. C. Greubel, Feb 08 2019
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|