OFFSET
1,3
COMMENTS
For each prime number p less than or equal to n, add 1 if p|n, otherwise add p (see example).
EXAMPLE
a(9) = 15; The primes less than or equal to 9 are 2, 3, 5, 7 and only 3|9. We then have, respectively, a(9) = 2 + 1 + 5 + 7 = 15.
MATHEMATICA
nterms=100; Table[Total[Map[If[Mod[n, #]==0, 1, #]&, Prime[Range[PrimePi[n]]]]], {n, nterms}] (* Paolo Xausa, Nov 22 2021 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Wesley Ivan Hurt, Nov 21 2021
STATUS
approved