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 A091623 #8 Nov 28 2021 01:22:13 %S A091623 1,-1,-3,-1,5,13,27,41,43,25,-23,-157,-447,-1011,-2087,-4081,-7685, %T A091623 -14141,-25707,-46251,-82729,-147295,-261317,-462403,-816653,-1439457, %U A091623 -2532779,-4448035,-7794637,-13624815,-23744693,-41230561,-71277787 %N A091623 Column 1 of triangle A091614. %H A091623 G. C. Greubel, <a href="/A091623/b091623.txt">Table of n, a(n) for n = 1..120</a> %t A091623 b[n_, l_, k_]:= b[n, l, k]= If[n==0, 1, Sum[If[i==l, 0, Sum[b[n-i*j, i, k], {j, 1, Min[k, n/i]}]], {i, n}]]; %t A091623 t[n_, k_]:= t[n, k]= If[k>n, 0, b[n, 0, k] - b[n, 0, k-1]]; (* A091613 *) %t A091623 M:= With[{p=53}, Table[t[n, k], {n, p}, {k, p}]]; %t A091623 T := Inverse[M]; (* A091614 *) %t A091623 Table[T[[n, 1]], {n, 50}] (* _G. C. Greubel_, Nov 27 2021 *) %Y A091623 Cf. A091614. %K A091623 sign %O A091623 1,3 %A A091623 _Christian G. Bower_, Jan 23 2004