OFFSET
1,2
LINKS
FORMULA
a(n) = 2^A008481(n).
PROG
(PARI) A318312(n) = factorback(apply(e -> 2^numbpart(e), factor(n)[, 2]));
CROSSREFS
KEYWORD
nonn,mult
AUTHOR
Antti Karttunen, Aug 30 2018
STATUS
approved