login
A318472
Multiplicative with a(p^e) = 2^A000045(e).
4
1, 2, 2, 2, 2, 4, 2, 4, 2, 4, 2, 4, 2, 4, 4, 8, 2, 4, 2, 4, 4, 4, 2, 8, 2, 4, 4, 4, 2, 8, 2, 32, 4, 4, 4, 4, 2, 4, 4, 8, 2, 8, 2, 4, 4, 4, 2, 16, 2, 4, 4, 4, 2, 8, 4, 8, 4, 4, 2, 8, 2, 4, 4, 256, 4, 8, 2, 4, 4, 8, 2, 8, 2, 4, 4, 4, 4, 8, 2, 16, 8, 4, 2, 8, 4, 4, 4, 8, 2, 8, 4, 4, 4, 4, 4, 64, 2, 4, 4, 4, 2, 8, 2, 8, 8
OFFSET
1,2
FORMULA
a(n) = 2^A318471(n).
PROG
(PARI) A318472(n) = factorback(apply(e -> 2^fibonacci(e), factor(n)[, 2]));
CROSSREFS
KEYWORD
nonn,mult
AUTHOR
Antti Karttunen, Aug 29 2018
STATUS
approved