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 A104024 #6 Feb 05 2014 20:18:06 %S A104024 2,1,64,900,5184,32400,57600,176400,705600,1166400,3240000,6350400, %T A104024 14288400,37454400,25401600,87609600 %N A104024 Least number k which can be written as k^2 * j, 0 < j <= k in n ways. %t A104024 t = Sort[ Flatten[ Table[n = k^2*j; If[n < 10^7, n, {}], {k, 10000}, {j, k}]]]; l = Length[t]; t[[Select[ Range[l - 11], t[[ # ]] == t[[ # + 11]] &]]] %Y A104024 Cf. A102354, A104020, A104022. %K A104024 nonn %O A104024 0,1 %A A104024 _Leroy Quet_ and _Robert G. Wilson v_, Feb 23 2005