OFFSET
1,2
LINKS
Antti Karttunen, Table of n, a(n) for n = 1..65537
PROG
(PARI) A319690(n) = { my(f=factor(n)); prod(i=1, #f~, (f[i, 1]%3)^f[i, 2]); };
CROSSREFS
KEYWORD
nonn,mult
AUTHOR
Antti Karttunen, Oct 04 2018
STATUS
approved