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 A056873 #12 Oct 12 2023 08:56:40
%S A056873 1,8,11,34,310,1688,2307,2708,13988,21315,46739,426378,771476,
%T A056873 11762557,18628390,19841526,24396168,85110245
%N A056873 Numbers k such that k | p(k) - q(k) where p(k) = partition numbers (A000041) and q(k) = partition numbers into distinct parts (A000009).
%C A056873 No other terms below 10^8. - _Max Alekseyev_, Oct 12 2023
%t A056873 Do[ If[ Mod[ PartitionsP[n] - PartitionsQ[n], n] == 0, Print[n]], {n, 1, 14577}]
%Y A056873 Cf. A000009, A000041, A051177, A056848, A056872, A121919. A128836, A162468, A259943.
%K A056873 nonn,more
%O A056873 1,2
%A A056873 _Robert G. Wilson v_, Sep 02 2000
%E A056873 a(10)-a(13) from _Sean A. Irvine_, May 12 2022
%E A056873 a(14)-a(18) from _Max Alekseyev_, Oct 12 2023