%I A062956
%S A062956 2,3,8,5,18,14,24,18,50,22,72,39,56,60,128,51,162,76,120,105,242,92,
%T A062956 240,150,234,162,392,116,450,248,320,264,408,210,648,333,456,312,800,
%U A062956 246,882,430,528,495,1058,376,1008,490,800,612,1352,477,1080,660,1008
%N A062956 H(n^2)-H(n), where H(n) is the half-totient function (A023022).
%o A062956 (PARI) H(n)=eulerphi(n)/2; j=[]; for(n=3,200,j=concat(j,H(n^2)-H(n))); 
               j
%Y A062956 (n-1)*A023022(n).
%Y A062956 Sequence in context: A095164 A075384 A072500 this_sequence A053650 A119794 
               A117987
%Y A062956 Adjacent sequences: A062953 A062954 A062955 this_sequence A062957 A062958 
               A062959
%K A062956 nonn
%O A062956 3,1
%A A062956 Jason Earls (zevi_35711(AT)yahoo.com), Jul 22 2001