|
%I #10 Feb 02 2019 12:13:44
%S 2,5,7,13,11,25,15,33,28,41,23,73,27,57,61,81,35,109,39,121,85,89,47,
%T 193,76,105,109,169,59,241,63,193,133,137,141,325,75,153,157,321,83,
%U 337,87,265,271,185,95,481,148,301,205,313,107,433,221,449,229,233,119,721
%N a(n) = n*tau(n) + 1.
%F a(n) = A038040(n) + 1. - _Torlach Rush_, Feb 02 2019
%t h[x_] := x*DivisorSigma[0, x]]+1 Table[h[w], {w, 1, 100}]
%Y Cf. A000005, A083272, A038040.
%K easy,nonn
%O 1,1
%A _Labos Elemer_, May 14 2003
|
