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 A104352 #15 Apr 08 2024 05:07:00
%S A104352 1,2,4,6,12,18,36,48,64,96,192,240,480,720,960,1200,2400,2880,5760,
%T A104352 7200,9600,14400,28800,33600,40320,60480,69120,86400,172800,201600,
%U A104352 403200,483840,645120,967680,1161216,1306368,2612736,3919104,5225472,5971968
%N A104352 Number of divisors of A104350(n).
%H A104352 Amiram Eldar, <a href="/A104352/b104352.txt">Table of n, a(n) for n = 1..1000</a>
%H A104352 Reinhard Zumkeller, <a href="/A104350/a104350.txt">Products of largest prime factors of numbers <= n</a>.
%F A104352 a(n) = A000005(A104350(n)).
%t A104352 DivisorSigma[0, FoldList[Times, Array[FactorInteger[#][[-1, 1]] &, 50]]] (* _Amiram Eldar_, Apr 08 2024 *)
%o A104352 (PARI) gpf(n) = {my(p = factor(n)[, 1]); p[#p];}
%o A104352 a(n) = numdiv(prod(k = 2, n, gpf(k))); \\ _Amiram Eldar_, Apr 08 2024
%Y A104352 Cf. A000005, A104350, A104353, A027423.
%K A104352 nonn
%O A104352 1,2
%A A104352 _Reinhard Zumkeller_, Mar 06 2005
%E A104352 Offset changed to 1 and a(1) prepended by _Amiram Eldar_, Apr 08 2024