OFFSET
0,1
LINKS
FORMULA
PROG
(PARI) A328613(n) = { my(m=1, p=2); while(n, m *= p^valuation(n, p); n = n\p; p = nextprime(1+p)); (m*p); };
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Oct 22 2019
STATUS
approved