A162530 Numbers k whose largest divisor <= sqrt(k) equals 10.

100, 110, 120, 130, 140, 150, 160, 170, 190, 200, 230, 250, 290, 310, 370, 410, 430, 470, 530, 590, 610, 670, 710, 730, 790, 830, 890, 970, 1010, 1030, 1070, 1090, 1130, 1270, 1310, 1370, 1390, 1490, 1510, 1570, 1630, 1670, 1730, 1790, 1810, 1910, 1930

Offset

1,1

Comments

See A161344 for more information.

Links

Robert Israel, Table of n, a(n) for n = 1..10000

Formula

Numbers k such that A033676(k) = 10.

Maple

filter:= n -> andmap(t -> t<=10 or t^2 > n, numtheory:-divisors(n)):
select(filter, [seq(n, n=100..10000, 10)]); # Robert Israel, Aug 16 2018

Mathematica

ld10Q[n_]:=Last[Select[Divisors[n], #<=Sqrt[n]&]]==10; Select[Range[2000], ld10Q]  (* Harvey P. Dale, Jan 30 2011 *)

Crossrefs

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

Sequence in context: A290948 A033828 A348139 * A204590 A115454 A122466

Adjacent sequences: A162527 A162528 A162529 * A162531 A162532 A162533

Keyword

easy,nonn

Author

Omar E. Pol, Jul 05 2009

Extensions

More terms from Gerard P. Michon, Jul 12 2009

Status

approved