A353330 - OEIS

The OEIS is supported by the many generous donors to the OEIS Foundation.

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

Other ways to Give

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

(list; graph; refs; listen; history; text; internal format)

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