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 A101601 #18 May 15 2022 07:32:28 %S A101601 1,9,81,756,7290,72171,729729,7505784,78298974,826489170,8811646074, %T A101601 94753804536,1026499549140,11192793160815,122744496427425, %U A101601 1352917116177840,14979996753469110,166542316847391870,1858400773709785470,20806975169765062200,233671377667405024620 %N A101601 G.f.: c(3x)^3, c(x) the g.f. of A000108. %F A101601 G.f.: 8/(1+sqrt(1-12*x))^3. %F A101601 a(n) = (3*n+3)/(n+3) * 3^n * C(n+1). %F A101601 Conjecture: (n+3)*a(n) -3*(5*n+7)*a(n-1) +18*(2*n-1)*a(n-2)=0. - _R. J. Mathar_, Nov 15 2011 %F A101601 From _Amiram Eldar_, May 15 2022: (Start) %F A101601 Sum_{n>=0} 1/a(n) = 51/121 + 964*arcsin(1/(2*sqrt(3)))/(121*sqrt(11)). %F A101601 Sum_{n>=0} (-1)^n/a(n) = 57/169 + 1204*arcsinh(1/(2*sqrt(3)))/(169*sqrt(13)). (End) %t A101601 terms = 18; %t A101601 c[x_] = (1 - Sqrt[1 - 4x])/(2x) + O[x]^terms // Normal; %t A101601 CoefficientList[c[3x]^3, x][[1 ;; terms]] (* _Jean-François Alcover_, Dec 15 2017 *) %Y A101601 Cf. A050159, A101600, A101602. %K A101601 easy,nonn %O A101601 0,2 %A A101601 _Paul Barry_, Dec 08 2004