login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A116388 Expansion of 1/((1+x*(1-M(x)))*sqrt(1-2*x-3*x^2)), M(x) the g.f. of A001006. 2

%I #12 Sep 08 2022 08:45:24

%S 1,1,4,10,29,82,236,681,1975,5745,16757,48982,143442,420721,1235663,

%T 3633453,10695292,31511524,92919758,274203662,809719718,2392579638,

%U 7073684393,20924387460,61925598216,183350728661,543095661673

%N Expansion of 1/((1+x*(1-M(x)))*sqrt(1-2*x-3*x^2)), M(x) the g.f. of A001006.

%H G. C. Greubel, <a href="/A116388/b116388.txt">Table of n, a(n) for n = 0..500</a>

%F G.f.: 2*x/(sqrt(1-2*x-3*x^2)*(sqrt(1-2*x-3*x^2) -1 +2*x +3*x^2)).

%F a(n) = Sum_{k=0..floor(n/2)} Sum_{j=0..n-k} C(n-k,j-k)*C(j,n-k-j).

%F Conjecture: n*a(n) + 7*(-n+1)*a(n-1) + 2*(4*n-9)*a(n-2) + (25*n-58)*a(n-3) + (-18*n+65)*a(n-4) + (-52*n+199)*a(n-5) + (-31*n+135)*a(n-6) + 6*(-n+5)*a(n-7) = 0. - _R. J. Mathar_, Jun 22 2016

%t Table[Sum[Sum[Binomial[n-k,j-k]*Binomial[j,n-k-j], {j,0,n-k}], {k,0,Floor[n/2]}], {n,0,30}] (* _G. C. Greubel_, May 23 2019 *)

%o (PARI) {a(n) = sum(k=0,n\2, sum(j=0,n-k, binomial(n-k, j-k)*binomial(j,n-k-j)))}; \\ _G. C. Greubel_, May 23 2019

%o (Magma) [(&+[ (&+[Binomial(n-k, j-k)*Binomial(j, n-k-j): j in [0..n-k]]) : k in [0..Floor(n/2)]]): n in [0..30]]; // _G. C. Greubel_, May 23 2019

%o (Sage) [sum( sum(binomial(n-k, j-k)*binomial(j,n-k-j) for j in (0..n)) for k in (0..floor(n/2))) for n in (0..30)] # _G. C. Greubel_, May 23 2019

%o (GAP) List([0..30], n-> Sum([0..n], k-> Sum([0..n], j-> Binomial(n-k, j-k)*Binomial(j, n-k-j) ))) # _G. C. Greubel_, May 23 2019

%K easy,nonn

%O 0,3

%A _Paul Barry_, Feb 12 2006

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 29 06:15 EDT 2024. Contains 371265 sequences. (Running on oeis4.)