A127469 a(n) = n * A062949(n).

1, 6, 15, 36, 45, 90, 91, 200, 207, 270, 231, 540, 325, 546, 675, 1040, 561, 1242, 703, 1620, 1365, 1386, 1035, 3000, 1725, 1950, 2565, 3276, 1653, 4050, 1891, 5152, 3465, 3366, 4095, 7452, 2701, 4218, 4875, 9000, 3321, 8190, 3655, 8316, 9315, 6210, 4371, 15600

Offset

1,2

Links

Amiram Eldar, Table of n, a(n) for n = 1..10000

Formula

a(n) = n * A062949(n).

Multiplicative with a(p^e) = ((e+1)*p^(2*e+1) - (e+2)*p^(2*e) + p^e)/(p-1). - Amiram Eldar, Aug 31 2023

Example

a(5) = 45 = 5 * A062949(5) = 5 * 9.

Maple

A127469 := proc(n) n*A062949(n) ; end proc:
seq(A127469(n), n=1..80) ; # R. J. Mathar, Feb 09 2011

Mathematica

f[p_, e_] := ((e+1)*p^(e+1)-(e+2)*p^e+1)/(p-1); a[1] = 1; a[n_] := n * Times @@ f @@@ FactorInteger[n]; Array[a, 60] (* Amiram Eldar, Aug 31 2023 *)

Crossrefs

Cf. A062949.

Row sums of triangle A127470.

Sequence in context: A378746 A338057 A191002 * A103106 A272788 A273151

Adjacent sequences: A127466 A127467 A127468 * A127470 A127471 A127472

Keyword

nonn,easy,mult

Author

Gary W. Adamson, Jan 15 2007

Extensions

More terms from Amiram Eldar, Aug 31 2023

Status

approved