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 A341228 #7 Feb 07 2021 11:24:27
%S A341228 1,18,171,1149,6147,27891,111567,403722,1345896,4189334,12300174,
%T A341228 34337403,91721385,235645425,584759880,1406588073,3289489002,
%U A341228 7498465029,16697615817,36391839264,77758115283,163123713621,336420277812,682877289213,1365674365197,2693384989056
%N A341228 Expansion of (-1 + Product_{k>=1} 1 / (1 - x^k))^9.
%H A341228 Alois P. Heinz, <a href="/A341228/b341228.txt">Table of n, a(n) for n = 9..10000</a>
%p A341228 b:= proc(n, k) option remember; `if`(k<2, `if`(n=0, 1-k, combinat[
%p A341228 numbpart](n)), (q-> add(b(j, q)*b(n-j, k-q), j=0..n))(iquo(k, 2)))
%p A341228 end:
%p A341228 a:= n-> b(n, 9):
%p A341228 seq(a(n), n=9..34); # _Alois P. Heinz_, Feb 07 2021
%t A341228 nmax = 34; CoefficientList[Series[(-1 + Product[1/(1 - x^k), {k, 1, nmax}])^9, {x, 0, nmax}], x] // Drop[#, 9] &
%Y A341228 Column k=9 of A060642.
%Y A341228 Cf. A000041, A023008, A048574, A327387, A341221, A341222, A341223, A341225, A341226, A341227.
%K A341228 nonn
%O A341228 9,2
%A A341228 _Ilya Gutkovskiy_, Feb 07 2021