%I A080197
%S A080197 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,18,20,21,22,24,25,26,27,28,30,
%T A080197 32,33,35,36,39,40,42,44,45,48,49,50,52,54,55,56,60,63,64,65,66,70,72,
%U A080197 75,77,78,80,81,84,88,90,91,96,98,99,100,104,105,108,110,112,117,120
%N A080197 13-smooth numbers: i.e. numbers whose prime divisors are all <= 13.
%C A080197 Numbers of the form 2^r*3^s*5^t*7^u*11^v*13^w with r, s, t, u, v, w >
               = 0.
%e A080197 33 = 3*11 and 39 = 3*13 are terms but 34 = 2*17 is not.
%o A080197 (PARI) test(n)= {m=n; forprime(p=2,13, while(m%p==0,m=m/p)); return(m==1)} 
               for(n=1,200,if(test(n),print1(n",")))
%Y A080197 Cf. A000079, A080196. For p-smooth numbers with other values of p, see 
               A003586, A051037, A002473, A051038, A080681, A080682, A080683.
%Y A080197 Sequence in context: A023810 A102800 A072676 this_sequence A115847 A032966 
               A122937
%Y A080197 Adjacent sequences: A080194 A080195 A080196 this_sequence A080198 A080199 
               A080200
%K A080197 easy,nonn
%O A080197 1,2
%A A080197 Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), Feb 10 2003