A332212 Fully multiplicative with a(p) = A332211(A000720(p)).

1, 2, 3, 4, 7, 6, 5, 8, 9, 14, 31, 12, 11, 10, 21, 16, 127, 18, 13, 28, 15, 62, 17, 24, 49, 22, 27, 20, 19, 42, 23, 32, 93, 254, 35, 36, 29, 26, 33, 56, 8191, 30, 37, 124, 63, 34, 41, 48, 25, 98, 381, 44, 43, 54, 217, 40, 39, 38, 131071, 84, 47, 46, 45, 64, 77, 186, 524287, 508, 51, 70, 53, 72, 59, 58, 147, 52, 155, 66, 61, 112, 81, 16382, 67, 60

Offset

1,2

Links

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

Index entries for sequences that are permutations of the natural numbers

Formula

a(1) = 1, a(p^e) = A332211(A000720(p))^e, a(m*n) = a(m)*a(n).

Prog

(PARI)
\\ Needs also code from A332211:
A332212(n) = { my(f=factor(n)); f[, 1] = apply(A332211, apply(primepi, f[, 1])); factorback(f); };

Crossrefs

Cf. A000043, A000668, A000720, A332211, A332213 (inverse permutation), A332214.

Sequence in context: A235199 A270426 A270425 * A085161 A085162 A182178

Adjacent sequences: A332209 A332210 A332211 * A332213 A332214 A332215

Keyword

nonn,mult

Author

Antti Karttunen, Feb 09 2020

Status

approved