proposed
approved
proposed
approved
editing
proposed
Antti Karttunen, <a href="/A319986/b319986.txt">Table of n, a(n) for n = 1..10000</a>
Antti Karttunen, <a href="/A319986/a319986.txt">Data supplement: n, a(n) computed for n = 1..100000</a>
allocated for Antti KarttunenFully multiplicative with a(p^e) = prime(p mod 6)^e.
1, 3, 5, 9, 11, 15, 2, 27, 25, 33, 11, 45, 2, 6, 55, 81, 11, 75, 2, 99, 10, 33, 11, 135, 121, 6, 125, 18, 11, 165, 2, 243, 55, 33, 22, 225, 2, 6, 10, 297, 11, 30, 2, 99, 275, 33, 11, 405, 4, 363, 55, 18, 11, 375, 121, 54, 10, 33, 11, 495, 2, 6, 50, 729, 22, 165, 2, 99, 55, 66, 11, 675, 2, 6, 605, 18, 22, 30, 2, 891, 625, 33, 11, 90, 121, 6
1,2
(PARI) A319986(n) = { my(f=factor(n)); prod(i=1, #f~, (prime(f[i, 1]%6))^f[i, 2]); };
allocated
nonn,mult
Antti Karttunen, Oct 06 2018
approved
editing