This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A104625 #24 Sep 01 2024 18:24:08 %S A104625 1,2,7,24,87,322,1211,4604,17645,68042,263655,1025632,4002601, %T A104625 15662422,61427543,241386924,950160607,3745589510,14784496003, %U A104625 58424093536,231112008371,915065382154,3626113490579,14379912928572,57064644495359 %N A104625 Expansion of 1/(sqrt(1-4*x) - x^2). %C A104625 Diagonal sums of convolution triangle of central binomial coefficients A054335. %C A104625 Number of lattice paths from (0,0) to (n,n) with steps (0,1), (1,0) and, when on the diagonal, (2,2). - _Alois P. Heinz_, Sep 14 2016 %H A104625 Alois P. Heinz, <a href="/A104625/b104625.txt">Table of n, a(n) for n = 0..1000</a> %F A104625 Conjecture: n*a(n) + (n-3)*a(n-1) + 2*(-28*n+51)*a(n-2) + 72*(2*n-5)*a(n-3) - n*a(n-4) + (-5*n+3)*a(n-5) + 18*(2*n-5)*a(n-6) = 0. - _R. J. Mathar_, Feb 20 2015 %F A104625 a(n) = Sum_{k=0..floor(n+2)/2} 4^(n+2-2*k) * binomial(n+1-3*k/2,n+2-2*k). - _Seiichi Manyama_, Feb 06 2024 %t A104625 CoefficientList[Series[1/(Sqrt[1-4*x] -x^2), {x, 0, 50}], x] (* _G. C. Greubel_, Aug 12 2018 *) %o A104625 (PARI) x='x+O('x^50); Vec(1/(sqrt(1-4*x) - x^2)) \\ _G. C. Greubel_, Aug 12 2018 %o A104625 (Magma) m:=50; R<x>:=PowerSeriesRing(Rationals(), m); Coefficients(R!(1/(sqrt(1-4*x) - x^2))); // _G. C. Greubel_, Aug 12 2018 %Y A104625 Cf. A000984, A026671, A054335. %K A104625 easy,nonn %O A104625 0,2 %A A104625 _Paul Barry_, Mar 17 2005