|
|
A323491
|
|
Denominators of the sequence c(n) satisfying Sum_{k=0..n} c(k)/(n+k+1) = 0 with c(0)=1.
|
|
1
|
|
|
1, 2, 24, 720, 4480, 3628800, 68428800, 118609920, 20922789888000, 6402373705728000, 115852476579840000, 1124000727777607680000, 1909072005333044428800, 1148978521728221184000000, 12195533784468554420060160000, 53050571962438211727261696000000, 7973661725263440308097515520000000
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
EXAMPLE
|
The sequence c(n) begins: 1, -3/2, 5/24, 77/720, 277/4480, 140173/3628800, ...
|
|
PROG
|
(PARI) lista(nn) = {my(c0 = 1, vc = vector(nn)); for (n=1, nn, vc[n] = -(2*n+1)*(c0/(n+1) + sum(k=1, n-1, vc[k]/(n+k+1))); ); apply(x->numerator(x), concat([c0], vc)); }
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,frac
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|