|
|
A026842
|
|
a(n) = T(2n,n-3), T given by A026725.
|
|
4
|
|
|
1, 9, 56, 300, 1487, 7041, 32381, 146017, 649395, 2859231, 12494914, 54291912, 234860677, 1012433965, 4352210327, 18666918033, 79916230409, 341615895659, 1458457275715, 6220016154525, 26503542364381, 112847001503099, 480173686483581
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
3,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
Drop[CoefficientList[Series[(1-Sqrt[1-4*x])^8/(32*x^3*(8*x^2 -(1 - Sqrt[1-4*x])^3 )), {x, 0, 30}], x], 3] (* G. C. Greubel, Jul 17 2019 *)
|
|
PROG
|
(PARI) my(x='x+O('x^30)); Vec((1-sqrt(1-4*x))^8/(32*x^3*(8*x^2 -(1 - sqrt(1-4*x))^3 ))) \\ G. C. Greubel, Jul 17 2019
(Magma) R<x>:=PowerSeriesRing(Rationals(), 30); Coefficients(R!( (1-Sqrt(1-4*x))^8/(32*x^3*(8*x^2 -(1-Sqrt(1-4*x))^3 )) )); // G. C. Greubel, Jul 17 2019
(Sage) a=((1-sqrt(1-4*x))^8/(32*x^3*(8*x^2 -(1-sqrt(1-4*x))^3 ))).series(x, 30).coefficients(x, sparse=False); a[3:] # G. C. Greubel, Jul 17 2019
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|