A353330 a(n) = A006047(A156552(n)).

1, 2, 3, 2, 4, 6, 9, 6, 3, 2, 12, 6, 12, 18, 4, 6, 12, 8, 36, 6, 3, 6, 16, 18, 4, 18, 12, 18, 81, 6, 144, 8, 12, 24, 9, 2, 324, 24, 12, 8, 432, 8, 108, 24, 12, 6, 576, 18, 9, 18, 48, 72, 11664, 6, 4, 54, 12, 216, 972, 24, 3888, 162, 12, 6, 36, 18, 1728, 24, 12, 24, 8748, 6, 5184, 648, 27, 18, 16, 72, 34992, 54, 4, 72

Offset

1,2

Links

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

Index entries for sequences computed from indices in prime factorization

Formula

a(n) = A006047(A156552(n)).

Prog

(PARI)
A006047(n) = { my(m=1, d); while(n, d = (n%3); m *= (1+d); n = (n-d)/3); m; };
A156552(n) = { my(f = factor(n), p, p2 = 1, res = 0); for(i = 1, #f~, p = 1 << (primepi(f[i, 1]) - 1); res += (p * p2 * (2^(f[i, 2]) - 1)); p2 <<= f[i, 2]); res };
A353330(n) = A006047(A156552(n));

Crossrefs

Cf. A006047, A156552.

Cf. also A329903, A332814, A341353 and A353360.

Sequence in context: A079159 A192298 A341098 * A254967 A229012 A207606

Adjacent sequences: A353327 A353328 A353329 * A353331 A353332 A353333

Keyword

nonn,look

Author

Antti Karttunen, Apr 20 2022

Status

approved