A085236 (Greatest power of greatest prime factor of n) < square root(n).

12, 24, 30, 40, 45, 48, 56, 60, 63, 70, 80, 84, 90, 96, 105, 112, 120, 126, 132, 135, 140, 144, 154, 160, 165, 168, 175, 176, 180, 182, 189, 192, 195, 198, 208, 210, 220, 224, 231, 234, 240, 252, 260, 264, 270, 273, 275, 280, 286, 288, 297, 306, 308, 312

Offset

1,1

Comments

A053585(a(n))^2 < a(n).

Links

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

Maple

filter:= proc(n) local F, j;
  F:= ifactors(n)[2];
  j:= max[index](map(t->t[1], F));
  F[j][1]^(2*F[j][2]) < n
end proc:
select(filter, [$2..1000]); # Robert Israel, Nov 30 2016

Crossrefs

Sequence in context: A364462 A369182 A108938 * A068567 A316099 A082801

Adjacent sequences: A085233 A085234 A085235 * A085237 A085238 A085239

Keyword

nonn

Author

Reinhard Zumkeller, Jun 22 2003

Status

approved