%I #9 Aug 23 2017 06:11:22

%S 1,1,2,2,2,2,6,2,6,2,6,2,6,6,4,4,2,6,4,4,6,6,9,4,8,6,4,6,8,4,12,2,8,2,

%T 12,6,4,4,12,2,12,6,12,8,12,9,12,2,12,8,6,12,6,4,12,12,4,8,12,2,16,12,

%U 4,6,6,8,15,6,12,12,15,12,8,4,12,4,16,12,16

%N a(n) = tau(sigma(phi(n))).

%H Antti Karttunen, <a href="/A151948/b151948.txt">Table of n, a(n) for n = 1..10000</a>

%F a(n) = A000005(A000203(A000010(n))) = A000005(A062402(n)) = A062068(A000010(n)).

%o (PARI) A151948(n) = numdiv(sigma(eulerphi(n))); \\ _Antti Karttunen_, Aug 22 2017

%Y Cf. A000005, A000010, A000203, A062068, A062402, A163375.

%K nonn

%O 1,3

%A _Jaroslav Krizek_, Jul 20 2009