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 A156577 #6 Jan 04 2022 20:56:32 %S A156577 1,9,90,891,8910,88938,889380,8890155,88901550,888923646,8889236460, %T A156577 88889884542,888898845420,8888918303988,88889183039880, %U A156577 888889778505099,8888897785050990,88888916293698870,888889162936988700 %N A156577 a(2*n+2) = 10*a(2*n+1), a(2*n+1) = 10*a(2*n) - 9^n*A000108(n), a(0) = 1. %C A156577 Hankel transform is 9^binomial(n+1,2). %H A156577 G. C. Greubel, <a href="/A156577/b156577.txt">Table of n, a(n) for n = 0..500</a> %F A156577 a(n) = Sum_{k=0..n} A120730(n,k) * 9^k. %t A156577 a[n_]:= a[n]= If[n==0, 1, If[OddQ[n], 10*a[n-1] -9^((n-1)/2)*CatalanNumber[(n-1)/2], 10*a[n-1] ]]; %t A156577 Table[a[n], {n, 0, 30}] (* _G. C. Greubel_, Jan 04 2022 *) %o A156577 (Sage) %o A156577 def a(n): # a = A156577 %o A156577 if (n==0): return 1 %o A156577 elif (n%2==1): return 10*a(n-1) - 9^((n-1)/2)*catalan_number((n-1)/2) %o A156577 else: return 10*a(n-1) %o A156577 [a(n) for n in (0..30)] # _G. C. Greubel_, Jan 04 2022 %Y A156577 Cf. A000108, A001405, A120730, A151162, A151254, A151281, A156195, A156273, A156361, A156362, A156566. %K A156577 nonn %O A156577 0,2 %A A156577 _Philippe Deléham_, Feb 10 2009