login
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
OFFSET
0,2
LINKS
Alexander Kalmynin, Petr Kosenko, Orthorecursive expansion of unity, arXiv:1901.04044 [math.NT], 2019.
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
Cf. A323490 (numerators).
Sequence in context: A012723 A354335 A069150 * A046977 A309205 A279331
KEYWORD
nonn,frac
AUTHOR
Michel Marcus, Jan 16 2019
STATUS
approved