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 A304028 #15 May 05 2018 06:38:53
%S A304028 1,2,3,6,7,8,11,12,15,18,19,22,23,24,27,28,31,32,33,43,44,47,48,60,67,
%T A304028 72,76,92,96,108,112,128,2229,2929,3022,4481,34542,34951,36996,58091,
%U A304028 292949,437728,438237,2103581,2237158,3215950,3375578
%N A304028 Numbers k such that A033461(k) is divisible by k.
%C A304028 A001422 is a finite subsequence.
%e A304028 2229 is in the sequence because A033461(2229) = 51267 = 23 * 2229.
%t A304028 max = 100; p = ConstantArray[0, max^2 + 1]; p[[1]] = 1; p[[2]] = 1; Do[Do[p[[j + 1]] += p[[j - k^2 + 1]], {j, max^2, k^2, -1}];, {k, 2, max}]; Select[Range[1, max^2], Divisible[p[[# + 1]], #] &]
%Y A304028 Cf. A001422, A033461, A051177, A056848, A276517.
%K A304028 nonn
%O A304028 1,2
%A A304028 _Vaclav Kotesovec_, May 04 2018