The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A115968 Expansion of 1/(sqrt(1-4*x) + sqrt(1-2*x-3*x^2) - 1). 1
 1, 3, 13, 57, 255, 1149, 5201, 23607, 107345, 488721, 2227007, 10154511, 46323507, 211396611, 964966149, 4405717137, 20118308687, 91880092029, 419657355725, 1916914550859, 8756654087981, 40003289475363, 182755724339143 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,2 LINKS G. C. Greubel, Table of n, a(n) for n = 0..1000 FORMULA G.f.: A(x)*B(x)/(A(x) +B(x) -A(x)*B(x)) where A(x) is the g.f. of A000984 and B(x) is the g.f. of A002426. MATHEMATICA CoefficientList[Series[1/(Sqrt[1-4*x] +Sqrt[1-2*x-3*x^2] -1), {x, 0, 30} ], x] (* G. C. Greubel, Mar 08 2017 *) PROG (PARI) my(x='x+O('x^30)); Vec(1/(sqrt(1-4*x) + sqrt(1-2*x-3*x^2) - 1)) \\ G. C. Greubel, Mar 08 2017 (MAGMA) R:=PowerSeriesRing(Rationals(), 30); Coefficients(R!( 1/(Sqrt(1-4*x) + Sqrt(1-2*x-3*x^2) - 1) )); // G. C. Greubel, May 06 2019 (Sage) (1/(sqrt(1-4*x) + sqrt(1-2*x-3*x^2) - 1)).series(x, 30).coefficients(x, sparse=False) # G. C. Greubel, May 06 2019 CROSSREFS Sequence in context: A010921 A275634 A163606 * A256939 A005827 A151319 Adjacent sequences:  A115965 A115966 A115967 * A115969 A115970 A115971 KEYWORD easy,nonn AUTHOR Paul Barry, Feb 03 2006 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified March 28 07:59 EDT 2020. Contains 333079 sequences. (Running on oeis4.)