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.

A193988 Numbers n such that sigma_2(n) > sigma_2(k) for all k < n.

This page as a plain text file.
%I A193988 #16 May 14 2022 11:59:44
%S A193988 1,2,3,4,5,6,8,9,10,12,14,15,16,18,20,22,24,28,30,32,34,36,40,42,44,
%T A193988 46,48,52,54,56,60,64,66,70,72,78,80,84,90,96,100,102,108,114,120,126,
%U A193988 132,138,140,144,150,156,162,168,180,192,198,204,210,216,228
%N A193988 Numbers n such that sigma_2(n) > sigma_2(k) for all k < n.
%C A193988 Where record values of sigma_2(n) occur. Records transform of A001157.
%H A193988 Amiram Eldar, <a href="/A193988/b193988.txt">Table of n, a(n) for n = 1..10000</a> (terms 1..1000 from T. D. Noe)
%t A193988 mx = 0; t = {}; Do[u = DivisorSigma[2, n]; If[u > mx, mx = u; AppendTo[t, n]], {n, 1000}]; t
%t A193988 DeleteDuplicates[Table[{n,DivisorSigma[2,n]},{n,1000}],GreaterEqual[#1[[2]],#2[[2]]]&][[All,1]] (* _Harvey P. Dale_, May 14 2022 *)
%Y A193988 Cf. A001157, A002093 (highly abundant numbers), A193989.
%K A193988 nonn
%O A193988 1,2
%A A193988 _T. D. Noe_, Aug 17 2011