Annual Appeal: Please make a donation (tax deductible in USA) to keep the OEIS running. Over 5000 articles have referenced us, often saying "we discovered this result with the help of the OEIS".
%N Number of k such that phi(k) divides phi(n).
%o (PARI) for(n=1,100,print1(sum(i=1,1000,if(eulerphi(n)%eulerphi(i),0,1)),","))
%A _Benoit Cloitre_, Jun 10 2002