|
%I #18 Dec 20 2023 15:11:23
%S 1,3,4,7,12,15,18,28,31,39,42,60,72,91,96,124,168,195,224,234,252,280,
%T 360,403,480,546,576,600,744,819,868,992,1170,1344,1512,1560,1680,
%U 1860,1872,2016,2418,2880,3048,3224,3600,3844,4368,4914,5040,5082,5952,6045
%N Record values of sigma(n).
%C RECORDS transform of A000203.
%H Amiram Eldar, <a href="/A034885/b034885.txt">Table of n, a(n) for n = 1..10000</a> (terms 1..639 from T. D. Noe)
%H N. J. A. Sloane, <a href="/transforms.txt">Transforms</a> (The RECORDS transform returns both the high-water marks and the places where they occur).
%F a(n) = A000203(A002093(n)).
%t DeleteDuplicates[DivisorSigma[1,Range[5000]],GreaterEqual] (* _Harvey P. Dale_, Dec 20 2023 *)
%Y Cf. A000203, A002093, A034091.
%K nonn
%O 1,2
%A _Erich Friedman_
|
