1,3

A062968 = n - A070824 [From Eric Desbiaux, Dec 10 2009]

Table of n, a(n) for n=1..73.

a(n) = n+1-A000005(n) = A049820(n)-1. [From Omar E. Pol, Jul 16 2009]

Table[n + 1 - DivisorSigma[0, n], {n, 1, 73}] (* Jean-François Alcover, Jun 24 2013 *)

(PARI) j=[]; for(n=1, 150, j=concat(j, numdiv(n)-n-1)); j

Cf. A062969.

Cf. A000005, A049820. [From Omar E. Pol, Jul 16 2009]

Sequence in context: A304214 A060367 A267451 * A239966 A304406 A053197

Adjacent sequences: A062965 A062966 A062967 * A062969 A062970 A062971

nonn

Jason Earls, Jul 23 2001

approved