|
%I #7 Oct 15 2013 22:31:23
%S 6,10,9,3,6,3,2,0,4,6,0,3,4,3,0,4,0,0,3,2,3,3,4,4,3,2,0,2,0,4,3,6,2,3,
%T 2,0,0,3,0,4,6,0,4,3,0,3,0,0,0,0,4,6,0,4,0,0,2,0,3,4,0,4,3,0,0,0,0,0,
%U 2,0,0,4,0,3,0,0,0,0,2,3,4,0,6,3,0,4,2,0,0,0,0,2,3,6,3,0,6,0,0,0,0,2,0,0
%N Number of terms in the set InvPhi(8*p(n)), where p(n) is the n-th prime.
%H Donovan Johnson, <a href="/A071630/b071630.txt">Table of n, a(n) for n = 1..1000</a>
%e n=5:invphi(8*11)={89,115,178,184,230,276}, a(5)=6.
%p [seq(nops(invphi(8*ithprime(i))),i=1..128)];
%Y Cf. A000010, A005277, A007617, A058888, A002202, A071629-A071634.
%K nonn
%O 1,1
%A _Labos Elemer_, May 30 2002
|
