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 A316428 #5 Jul 03 2018 07:29:03 %S A316428 1,2,3,5,7,9,11,13,17,19,21,23,29,31,37,39,41,43,47,49,53,57,59,61,67, %T A316428 71,73,79,83,87,89,91,97,101,103,107,109,111,113,125,127,129,131,133, %U A316428 137,139,149,151,157,159,163,167,169,173,179,181,183,191,193,197 %N A316428 Heinz numbers of integer partitions such that every part is divisible by the number of parts. %C A316428 The Heinz number of an integer partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k). %e A316428 93499 is the Heinz number of (12,8,8,4) and belongs to the sequence because each part is divisible by 4. %e A316428 Sequence of partitions such that every part is divisible by the number of parts begins (1), (2), (3), (4), (2,2), (5), (6), (7), (8), (4,2), (9). %t A316428 Select[Range[200],And@@Cases[If[#==1,{},FactorInteger[#]],{p_,k_}:>Divisible[PrimePi[p],PrimeOmega[#]]]&] %Y A316428 Cf. A056239, A067538, A074761, A143773, A237984, A289509, A296150, A298423, A316413. %K A316428 nonn %O A316428 1,2 %A A316428 _Gus Wiseman_, Jul 02 2018