OFFSET

0,2

LINKS

PROG

(PARI) A373600(n) = { my(p=2, s=0); while(n, s += (n%p)*p; n = n\p; p = nextprime(1+p)); (s); };

CROSSREFS

KEYWORD

nonn

AUTHOR

Antti Karttunen, Jun 18 2024

STATUS

approved