A347614 a(n) = Sum_{k=1..n} n^Omega(k).

1, 3, 7, 25, 41, 91, 127, 673, 1009, 1441, 1871, 4093, 5149, 6553, 8191, 75361, 95201, 124543, 153217, 194561, 234781, 280897, 332949, 723673, 849601, 991251, 1168831, 1369117, 1569597, 1818301, 2065531, 35891553, 41771137, 48397471, 55839561, 65848861, 75339253

Offset

1,2

Links

Michael De Vlieger, Table of n, a(n) for n = 1..1000

Example

a(5) = Sum_{k=1..5} 5^Omega(k) = 5^0 + 5^1 + 5^1 + 5^2 + 5^1 = 41.

Mathematica

Table[Sum[n^PrimeOmega[k], {k, n}], {n, 40}]

Prog

(PARI) a(n) = sum(k=1, n, n^bigomega(k)); \\ Michel Marcus, Sep 09 2021

Crossrefs

Cf. A001222 (Omega), A347616.

Sequence in context: A118718 A349753 A058781 * A363535 A100462 A161637

Adjacent sequences: A347611 A347612 A347613 * A347615 A347616 A347617

Keyword

nonn

Author

Wesley Ivan Hurt, Sep 08 2021

Status

approved