OFFSET
1,2
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
EXAMPLE
a(6) = 21; a(6) = Sum_{p|6} p * prime(p) = 2*3 + 3*5 = 21.
MATHEMATICA
Join[{0}, Table[Total[# Prime[#]&/@FactorInteger[n][[;; , 1]]], {n, 2, 80}]] (* Harvey P. Dale, Jan 28 2024 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Wesley Ivan Hurt, Feb 08 2022
STATUS
approved