A162528 Numbers k whose largest divisor <= sqrt(k) equals 8.

64, 72, 80, 88, 96, 104, 112, 128, 136, 152, 184, 232, 248, 296, 328, 344, 376, 424, 472, 488, 536, 568, 584, 632, 664, 712, 776, 808, 824, 856, 872, 904, 1016, 1048, 1096, 1112, 1192, 1208, 1256, 1304, 1336, 1384, 1432, 1448, 1528, 1544, 1576, 1592, 1688

Offset: 1

Author

Omar E. Pol, Jul 05 2009

Keywords

• easy
• nonn

Comments

See A161344 for more information.

Crossrefs

Cf. A033676, A008578, A161344, A161345, A161424, A161835, A162526, A162527, A162529, A162530, A162531, A162532.

Programs

Maple

A033676 := proc(n) local dvs; dvs := sort(convert(numtheory[divisors](n),list)) ; op(floor((nops(dvs)+1)/2) ,dvs) ; end: for n from 1 to 2000 do if A033676(n) = 8 then printf("%d,",n) ; fi; od: # R. J. Mathar, Jul 13 2009

Mathematica

ld8Q[n_]:=Last[Select[Divisors[n],#<=Sqrt[n]&]]==8; Select[Range[ 2000], ld8Q] (* Harvey P. Dale, Apr 08 2017 *)

Formula

Numbers k such that A033676(k)=8.

Extensions

More terms from R. J. Mathar, Jul 13 2009