A319986 Fully 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

Offset

1,2

Comments

For all i, j:

A319716(i) = A319716(j) => a(i) = a(j) => A319690(i) = A319690(j).

Links

Antti Karttunen, Table of n, a(n) for n = 1..10000

Antti Karttunen, Data supplement: n, a(n) computed for n = 1..100000

Prog

(PARI) A319986(n) = { my(f=factor(n)); prod(i=1, #f~, (prime(f[i, 1]%6))^f[i, 2]); };

Crossrefs

Cf. A319690, A319716, A319984, A319985, A319987, A320116, A320117.

Sequence in context: A219611 A003071 A178442 * A359408 A284310 A109324

Adjacent sequences: A319983 A319984 A319985 * A319987 A319988 A319989

Keyword

nonn,mult

Author

Antti Karttunen, Oct 06 2018

Status

approved