OFFSET
0,2
LINKS
PROG
(PARI) A328627(n) = { my(m=1, p=2, d=0); while(n, d = lift(Mod(n, p)/(d+1)); m *= (p^d); n = n\p; p = nextprime(1+p)); (m); };
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Oct 25 2019
STATUS
approved