A347616 a(n) = Sum_{k=1..n} k^Omega(k).
1, 3, 6, 22, 27, 63, 70, 582, 663, 763, 774, 2502, 2515, 2711, 2936, 68472, 68489, 74321, 74340, 82340, 82781, 83265, 83288, 415064, 415689, 416365, 436048, 458000, 458029, 485029, 485060, 34039492, 34040581, 34041737, 34042962, 35722578, 35722615, 35724059, 35725580, 38285580
Offset: 1
Keywords
Examples
a(5) = Sum_{k=1..5} k^Omega(k) = 1^0 + 2^1 + 3^1 + 4^2 + 5^1 = 27.
Links
- Michael De Vlieger, Table of n, a(n) for n = 1..1000
Programs
-
Mathematica
Table[Sum[k^PrimeOmega[k], {k, n}], {n, 40}] -
PARI
a(n) = sum(k=1, n, k^bigomega(k)); \\ Michel Marcus, Sep 09 2021