A139703 Nonsquarefree positive integers k such that the largest prime power dividing k is prime.

20, 28, 44, 52, 60, 68, 76, 84, 88, 92, 99, 104, 116, 117, 124, 132, 136, 140, 148, 152, 153, 156, 164, 171, 172, 184, 188, 198, 204, 207, 212, 220, 228, 232, 234, 236, 244, 248, 260, 261, 264, 268, 272, 276, 279, 284, 292, 296, 304, 306, 308, 312, 316, 328

Offset

1,1

Links

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

Formula

This sequence consists of the nonsquarefree terms of A122144.

Example

99 = 3^2 * 11^1. 99 is therefore not squarefree, because it is divisible by 3^2. Also, the largest prime power dividing 99 is 11^1. This is a prime, so 99 is included in the sequence.

Maple

filter:= proc(n) local F, t, k;
  F:= ifactors(n)[2];
  if max(seq(t[2], t=F)) = 1 then return false fi;
  k:= max[index]([seq(t[1]^t[2], t=F)]);
  F[k, 2]=1
end proc:
select(filter, [$2..1000]); # Robert Israel, Jan 31 2021

Crossrefs

Cf. A122144.

Sequence in context: A252478 A124318 A309780 * A317924 A355445 A145567

Adjacent sequences: A139700 A139701 A139702 * A139704 A139705 A139706

Keyword

nonn

Author

Leroy Quet, Jun 13 2008

Extensions

Extended by Ray Chandler, Jul 01 2009

Status

approved