|
%I #17 Nov 03 2013 08:13:38
%S 1,2,4,6,10,12,16,18,22,28,30,36,40,42,46,52,58,60,66,70,72,78,82,88,
%T 96,100,102,106,108,112,120,126,130,136,138,148,150,156,162,166,172,
%U 178,186,190,192,196,198,210,222,226,228,232,238,264,268,270,276,280,282,292,306
%N Records in abs(sigma(n)-2*n) (absolute value of A033879).
%C RECORDS transform of |A033879|.
%H R. J. Mathar and Donovan Johnson, <a href="/A075728/b075728.txt">Table of n, a(n) for n = 1..1000</a> (first 220 terms from R. J. Mathar)
%H N. J. A. Sloane, <a href="/transforms.txt">Transforms</a>
%o (PARI) lista(nn) = {rec = -1; for (n=1, nn, d = abs(sigma(n) - 2*n); if (d > rec, print1(d, ", "); rec = d;););} \\ _Michel Marcus_, Nov 02 2013
%Y Cf. A033879, A074918. Different from A006093.
%K nonn
%O 1,2
%A _N. J. A. Sloane_, Oct 03 2002
%E Corrected name, _Michel Marcus_, Nov 02 2013
|
