OFFSET
1,3
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..1000
D. Merlini, R. Sprugnoli and M. C. Verri, The tennis ball problem, J. Combin. Theory, A 99 (2002), 307-344 (Table A.2).
FORMULA
G.f.: 2*(1-sqrt(1-4*x))/(2+sqrt(1-4*x)+sqrt(1+4*x)). - Philippe Deléham, Feb 09 2014
MATHEMATICA
Rest[CoefficientList[Series[2*(1-Sqrt[1-4*x])/(2+Sqrt[1-4*x] +Sqrt[1+ 4*x]), {x, 0, 30}], x]] (* G. C. Greubel, Jan 15 2019 *)
PROG
(PARI) my(x='x+O('x^30)); Vec(2*(1-sqrt(1-4*x))/(2+sqrt(1-4*x) +sqrt(1 +4*x))) \\ G. C. Greubel, Jan 15 2019
(Magma) m:=30; R<x>:=PowerSeriesRing(Rationals(), m); Coefficients(R!( 2*(1-Sqrt(1-4*x))/(2+Sqrt(1-4*x)+Sqrt(1+4*x)) )); // G. C. Greubel, Jan 15 2019
(Sage) a=(2*(1-sqrt(1-4*x))/(2+sqrt(1-4*x)+sqrt(1+4*x))).series(x, 30).coefficients(x, sparse=False); a[1:] # G. C. Greubel, Jan 15 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Jan 22 2003
EXTENSIONS
More terms from Philippe Deléham, Feb 09 2014
STATUS
approved