login
A348119
Numbers k such that k and k+1 are both numbers whose powerful part is larger than their powerfree part (A328014).
4
8, 24, 48, 49, 63, 80, 175, 224, 242, 288, 324, 350, 351, 360, 512, 539, 575, 675, 735, 832, 960, 1088, 1215, 1224, 1368, 1444, 1681, 1700, 1862, 2057, 2106, 2299, 2303, 2375, 2400, 2600, 2624, 2645, 2808, 3024, 3249, 3750, 3887, 3968, 4224, 4374, 4624, 4900, 5040
OFFSET
1,1
LINKS
EXAMPLE
8 is a term since both 8 and 9 are in A328014.
MATHEMATICA
f[p_, e_] := If[e==1, p, 1]; s[n_] := Times @@ (f @@@ FactorInteger[n]); Select[Range[5040], s[#]^2 < # && s[#+1]^2 < #+1 &]
CROSSREFS
Cf. A328014.
A060355 is a subsequence.
Sequence in context: A074348 A063403 A355433 * A306415 A122812 A022763
KEYWORD
nonn
AUTHOR
Amiram Eldar, Oct 01 2021
STATUS
approved