OFFSET
1,3
COMMENTS
See A319521 for a similar sequence and additional comments.
FORMULA
EXAMPLE
a(42) = a(prime(1)) * a(prime(2)) * a(prime(4)) = 1 * prime(1) * prime(2) = 6.
PROG
(PARI) a(n) = my (f=factor(n)); prod(i=1, #f~, my (pi=primepi(f[i, 1])); if (pi%2==0, prime(pi/2)^f[i, 2], 1))
CROSSREFS
KEYWORD
nonn,mult
AUTHOR
Rémy Sigrist, Sep 22 2018
STATUS
approved