OFFSET
0,2
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..1000
FORMULA
G.f.: 1/sqrt(x^6+2*x^5+x^4-2*x^3-2*x^2-4*x+1). - Mark van Hoeij, Apr 17 2013
D-finite with recurrence: n*a(n) +2*(-2*n+1)*a(n-1) +2*(-n+1)*a(n-2) +(-2*n+3)*a(n-3) +(n-2)*a(n-4) +(2*n-5)*a(n-5) +(n-3)*a(n-6)=0. - R. J. Mathar, Oct 08 2016
MATHEMATICA
CoefficientList[Series[1/Sqrt[x^6+2x^5+x^4-2x^3-2x^2-4x+1], {x, 0, 25}], x] (* Michael De Vlieger, Oct 08 2016 *)
PROG
(PARI) /* same as in A092566 but use */
steps=[[0, 1], [1, 0], [2, 2], [3, 3]];
/* Joerg Arndt, Jun 30 2011 */
(PARI) my(x='x+O('x^30)); Vec(1/sqrt(x^6+2*x^5+x^4-2*x^3-2*x^2-4*x+1)) \\ G. C. Greubel, Apr 29 2019
(Magma) R<x>:=PowerSeriesRing(Rationals(), 30); Coefficients(R!( 1/Sqrt(x^6+2*x^5+x^4-2*x^3-2*x^2-4*x+1) )); // G. C. Greubel, Apr 29 2019
(Sage) (1/sqrt(x^6+2*x^5+x^4-2*x^3-2*x^2-4*x+1)).series(x, 30).coefficients(x, sparse=False) # G. C. Greubel, Apr 29 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
Joerg Arndt, Jun 30 2011
STATUS
approved