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 A112698 #15 Mar 11 2023 16:55:11 %S A112698 1,5,37,357,3941,46949,587621,7616357,101332837,1375876965, %T A112698 18987759461,265554114405,3755416368997,53610591434597, %U A112698 771525112379237,11181285666076517,163041321978836837,2390321854565988197 %N A112698 Partial sum of (Catalan numbers A000108 multiplied by powers of 4). %H A112698 Vincenzo Librandi, <a href="/A112698/b112698.txt">Table of n, a(n) for n = 0..300</a> %F A112698 a(n) = Sum_{k=0,..,n} C(k)*4^k, n>=0, with C(n):=A000108(n). %F A112698 G.f.: c(4*x)/(1-x), where c(x):=(1-sqrt(1-4*x))/(2*x) is the o.g.f. of Catalan numbers A000108. %F A112698 Recurrence: (n+1)*a(n) = (17*n-7)*a(n-1) - 8*(2*n-1)*a(n-2). - _Vaclav Kotesovec_, Oct 19 2012 %F A112698 a(n) ~ 16^(n+1)/(15*sqrt(Pi)*n^(3/2)). - _Vaclav Kotesovec_, Oct 19 2012 %t A112698 CoefficientList[Series[(1-Sqrt[1-16*x])/(8*x)/(1-x), {x, 0, 20}], x] (* _Vaclav Kotesovec_, Oct 19 2012 *) %t A112698 With[{nn=20},Accumulate[4^Range[0,nn] CatalanNumber[Range[0,nn]]]] (* _Harvey P. Dale_, Mar 11 2023 *) %o A112698 (PARI) x='x+O('x^50); Vec((1-sqrt(1-16*x))/(8*x*(1-x))) \\ _G. C. Greubel_, Mar 17 2017 %Y A112698 Fifth column (m=4) of triangle A112705. %K A112698 nonn,easy %O A112698 0,2 %A A112698 _Wolfdieter Lang_, Oct 31 2005 %E A112698 Definition clarified by _Harvey P. Dale_, Mar 11 2023