A079710 Numbers m such that the squarefree kernel of m is larger than the squarefree kernel of m+1.

3, 7, 11, 15, 17, 19, 23, 24, 26, 31, 35, 39, 43, 44, 47, 51, 53, 55, 59, 62, 63, 67, 71, 74, 79, 80, 83, 87, 89, 91, 95, 97, 99, 103, 107, 111, 115, 116, 119, 120, 123, 124, 127, 131, 134, 139, 143, 146, 149, 151, 155, 159, 161, 163, 167, 168, 170, 174, 175, 179, 183

Offset

1,1

Comments

The numbers of terms not exceeding 10^k for k = 1, 2, ... are 2, 33, 345, 3393, 33910, 338730, 3387053, 33868719, 338683700, 3386831527, ... Apparently the asymptotic density of this sequence is 0.33868... - Amiram Eldar, Aug 31 2020

Links

Amiram Eldar, Table of n, a(n) for n = 1..10000

Formula

a(n) is asymptotic to c*n where c=2.94...

Mathematica

rad[n_] := Times @@ FactorInteger[n][[;; , 1]]; Select[Range[100], rad[#] > rad[# + 1] &] (* Amiram Eldar, Aug 31 2020 *)

Crossrefs

Complement of A079709.

Cf. A007947 (squarefree kernel).

Sequence in context: A310209 A196079 A285497 * A145832 A292637 A279608

Adjacent sequences: A079707 A079708 A079709 * A079711 A079712 A079713

Keyword

nonn

Author

Benoit Cloitre, Jan 31 2003

Status

approved