|
|
A099765
|
|
a(n) = (1/Pi)*(2^n/n)*(n-1)!*Integral_{t>=0} (sin(t)/t)^n dt.
|
|
5
|
|
|
1, 1, 2, 8, 46, 352, 3364, 38656, 519446, 7996928, 138826588, 2683604992, 57176039628, 1331300646912, 33636118326984, 916559498182656, 26795449170328038, 836606220759859200, 27784046218331805100
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
LINKS
|
|
|
FORMULA
|
a(n) = (1/n) * Sum_{k=0, floor(n/2)} (-1)^k * binomial(n, k) * (n-2*k)^(n-1).
|
|
MATHEMATICA
|
Table[1/n Sum[(-1)^k Binomial[n, k](n-2k)^(n-1), {k, 0, Floor[n/2]}], {n, 20}] (* Harvey P. Dale, Oct 21 2011 *)
|
|
PROG
|
(PARI) a(n)=(1/n)*sum(k=0, floor(n/2), (-1)^k*binomial(n, k)*(n-2*k)^(n-1))
(Magma) [(1/n)*(&+[(-1)^j*Binomial(n, j)*(n-2*j)^(n-1): j in [0..Floor(n/2)]]): n in [1..25]]; // G. C. Greubel, Apr 01 2022
(Sage) [(1/n)*sum((-1)^j*binomial(n, j)*(n-2*j)^(n-1) for j in (0..(n//2))) for n in (1..25)] # G. C. Greubel, Apr 01 2022
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|