cp's OEIS Frontend

A353360 a(n) = A006047(A048675(n)).

%I A353360 #6 Apr 20 2022 15:47:38
%S A353360 1,2,3,3,4,2,9,2,4,6,12,4,12,2,3,4,12,6,36,3,4,18,16,6,9,6,3,4,81,6,
%T A353360 144,6,3,18,4,3,324,24,12,6,432,6,108,3,9,24,576,3,12,2,12,12,11664,6,
%U A353360 9,6,48,6,972,9,3888,216,4,3,4,6,1728,12,12,8,8748,6,5184,162,4,48,9,18,34992,9,9,648,15552,4,36,72
%N A353360 a(n) = A006047(A048675(n)).
%H A353360 <a href="/index/Pri#prime_indices">Index entries for sequences computed from indices in prime factorization</a>
%F A353360 a(n) = A006047(A048675(n)).
%o A353360 (PARI)
%o A353360 A006047(n) = { my(m=1, d); while(n, d = (n%3); m *= (1+d); n = (n-d)/3); m; };
%o A353360 A048675(n) = { my(f = factor(n)); sum(k=1, #f~, f[k, 2]*2^primepi(f[k, 1]))/2; };
%o A353360 A353360(n) = A006047(A048675(n));
%Y A353360 Cf. A006047, A048675.
%Y A353360 Cf. also A332813, A332823 and A353330.
%K A353360 nonn
%O A353360 1,2
%A A353360 _Antti Karttunen_, Apr 20 2022