1,2

Antti Karttunen, Table of n, a(n) for n = 1..10000

Index entries for sequences related to sigma(n)

a(n) = A007953(A000203(n)). - Michel Marcus, Dec 26 2013

n=100, sigma(100)=217, SumDigit(217)=10, a(100)=10.

Array[Total[IntegerDigits[DivisorSigma[1, #]]]&, 90] (* Harvey P. Dale, Jan 02 2012 *)

(PARI) vector(80, n, sumdigits(sigma(n))) \\ Michel Marcus, Apr 08 2015

Cf. A000203, A007953, A077650, A175548.

Sequence in context: A248789 A105852 A190998 * A322656 A105827 A230289

Adjacent sequences: A067339 A067340 A067341 * A067343 A067344 A067345

nonn,base

Labos Elemer, Jan 16 2002

Offset corrected to 1 by Michel Marcus, Dec 26 2013

approved