%I A008367
%S A008367 1,289,323,361,391,437,493,527,529,551,589,629,667,697,703,713,731,
%T A008367 779,799,817,841,851,893,899,901,943,961,989,1003,1007,1037,1073,1081,
%U A008367 1121,1139,1147,1159,1189,1207,1219,1241,1247,1271,1273,1333,1343,1349
%N A008367 Composite but smallest prime factor >= 17.
%p A008367 for i from 1 to 2000 do if gcd(i,30030) = 1 and not isprime(i) then print(i); 
               fi; od;
%t A008367 Select[ Range[ 1500 ], (GCD[ #1, 30030 ]==1&&!PrimeQ[ #1 ])& ]
%Y A008367 Sequence in context: A047805 A008695 A107739 this_sequence A152852 A156572 
               A157990
%Y A008367 Adjacent sequences: A008364 A008365 A008366 this_sequence A008368 A008369 
               A008370
%K A008367 nonn
%O A008367 1,2
%A A008367 N. J. A. Sloane (njas(AT)research.att.com).