cp's OEIS Frontend

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.

A306621 Highly abundant numbers that are powerful.

This page as a plain text file.
%I A306621 #8 Mar 13 2019 23:49:35
%S A306621 1,4,8,16,36,72,108,144,216,288,1800,3600,7200
%N A306621 Highly abundant numbers that are powerful.
%C A306621 Alaoglu and Erdős proved that 7200 is the last term.
%C A306621 Intersection of A001694 and A002093.
%H A306621 Leonidas Alaoglu and Paul Erdős, <a href="https://doi.org/10.1090/S0002-9947-1944-0011087-2">On highly composite and similar numbers</a>, Transactions of the American Mathematical Society, Vol. 56, No. 3 (1944), pp. 448-469.
%t A306621 seq={1}; sm = 0; Do[s = DivisorSigma[1, n]; If[s>sm, sm = s; If[ Min @  FactorInteger[n][[;;, 2]] > 1, AppendTo[seq, n]]], {n, 2, 72000}]; seq
%Y A306621 Cf. A001694, A002093.
%K A306621 nonn,fini,full
%O A306621 1,2
%A A306621 _Amiram Eldar_, Mar 01 2019