login
A318312
Multiplicative with a(p^e) = 2^A000041(e).
2
1, 2, 2, 4, 2, 4, 2, 8, 4, 4, 2, 8, 2, 4, 4, 32, 2, 8, 2, 8, 4, 4, 2, 16, 4, 4, 8, 8, 2, 8, 2, 128, 4, 4, 4, 16, 2, 4, 4, 16, 2, 8, 2, 8, 8, 4, 2, 64, 4, 8, 4, 8, 2, 16, 4, 16, 4, 4, 2, 16, 2, 4, 8, 2048, 4, 8, 2, 8, 4, 8, 2, 32, 2, 4, 8, 8, 4, 8, 2, 64, 32, 4, 2, 16, 4, 4, 4, 16, 2, 16, 4, 8, 4, 4, 4, 256, 2, 8, 8, 16, 2, 8, 2, 16, 8, 4, 2, 32, 2, 8, 4, 64
OFFSET
1,2
FORMULA
a(n) = 2^A008481(n).
PROG
(PARI) A318312(n) = factorback(apply(e -> 2^numbpart(e), factor(n)[, 2]));
CROSSREFS
Differs from A318474 for the first time at n=32, where a(32) = 128, while A318474(32) = 256.
Sequence in context: A328721 A165872 A061142 * A318474 A326306 A366196
KEYWORD
nonn,mult
AUTHOR
Antti Karttunen, Aug 30 2018
STATUS
approved