%I A087269
%S A087269 1,9,12,18,21,25,26,28,32,34,35,36,42,45,49,52,55,57,60,65,68,69,70,74,
%T A087269 76,81,84,85,86,87,88,91,95,98,99,104,106,110,111,112,119,121,128,129,
%U A087269 130,133,135,141,143,145,147,155,158,159,160,161,162,165,170,172,177
%N A087269 Nonprime solutions to GCD[x,pi[x]]=GCD[x, A000720(x)]=1.
%t A087269 t=Table[GCD[w, PrimePi[w]], {w, 1, 1000}]; f=Flatten[Position[t, 1]]; 
               cf=Part[f, Flatten[Position[PrimeQ[f], False]]]
%Y A087269 Cf. A007053, A000720, A087266-A087268, A057809.
%Y A087269 Sequence in context: A154631 A141552 A162822 this_sequence A153973 A072702 
               A157973
%Y A087269 Adjacent sequences: A087266 A087267 A087268 this_sequence A087270 A087271 
               A087272
%K A087269 nonn
%O A087269 1,2
%A A087269 Labos E. (labos(AT)ana.sote.hu), Sep 16 2003