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 A111654 #12 Feb 24 2023 12:00:47
%S A111654 1,1,1,1,2,2,2,2,2,2,3,3,3,3,3,3,3,3,4,4,4,4,4,4,4,4,4,5,5,5,5,5,5,5,
%T A111654 5,5,5,6,6,6,6,6,6,6,6,6,6,6,6,7,7,7,7,7,7,7,7,7,7,7,7,7,7,8,8,8,8,8,
%U A111654 8,8,8,8,8,8,8,8,8,8,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9
%N A111654 n appears n-th composite number times.
%C A111654 n appears A002808(n) times.
%t A111654 Module[{nn=20,comps,len},comps=Select[Range[nn],CompositeQ];len=Length[ comps];Flatten[Table[#[[1]],{#[[2]]}]&/@Thread[{Range[len],comps}]]] (* _Harvey P. Dale_, Aug 17 2014 *)
%Y A111654 Cf. A002808, A111653, A111655.
%K A111654 easy,less,nonn
%O A111654 1,5
%A A111654 _Jonathan Vos Post_, Aug 12 2005