A143720 Complement of A143719.

8, 9, 16, 18, 25, 27, 32, 40, 45, 49, 50, 54, 56, 60, 63, 64, 75, 80, 81, 84, 88, 90, 96, 98, 99, 104, 108, 112, 117, 120, 121, 125, 126, 128, 132, 135, 136, 140, 147, 150, 152, 153, 156, 160, 162, 168, 169, 171, 175, 176, 180, 184, 189, 192, 198, 200, 204, 207, 208, 216

Offset: 1

Author

N. J. A. Sloane, Nov 29 2008

Keywords

• nonn

Links

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

Crossrefs

Cf. A143719, A141586.

Programs

Maple

filter:= proc(n) local F,M;
  F:= ifactors(n)[2];
  M:= max(F[..,2]);
  ormap(proc(q) local e; padic:-ordp(n,q) < add(floor(log[q](e+1)),e=F[..,2]) end proc, select(isprime, [$2..M]))
end proc:
select(filter, [$2..300]); # Robert Israel, Jan 29 2025