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 A347549 #14 Sep 14 2021 03:50:28
%S A347549 1,1,2,3,5,7,10,13,18,23,30,38,48,59,73,89,108,130,156,185,220,259,
%T A347549 304,356,415,482,559,645,743,854,979,1119,1278,1455,1654,1878,2127,
%U A347549 2405,2717,3063,3449,3879,4356,4885,5474,6125,6846,7645,8527,9501,10579
%N A347549 Number of partitions of n into 4 or more distinct parts.
%F A347549 G.f.: Sum_{k>=4} x^(k*(k + 1)/2) / Product_{j=1..k} (1 - x^j).
%F A347549 a(n) = A000009(n) - A014591(n). - _Vaclav Kotesovec_, Sep 14 2021
%t A347549 nmax = 60; CoefficientList[Series[Sum[x^(k (k + 1)/2)/Product[(1 - x^j), {j, 1, k}], {k, 4, nmax}], {x, 0, nmax}], x] // Drop[#, 10] &
%Y A347549 Cf. A000009, A014591, A111133, A347548.
%K A347549 nonn
%O A347549 10,3
%A A347549 _Ilya Gutkovskiy_, Sep 06 2021