OFFSET
1,1
COMMENTS
Apparently most of the numbers k such that k and k+1 have the same value of d_3 also have the same prime signature. a(1) = 2024 is the 212th number k such that d_3(k) = d_3(k+1), and up to 10^8 there are 8026247 such numbers k of them only 6414 are not in A052213.
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
EXAMPLE
2024 is a term since d_3(2024) = d_3(2025) = 90, and the prime signatures of 2024 = 2^3 * 11 * 23 and 2025 = 3^4 * 5^2 are different ([1, 1, 3] and [2, 4]).
MATHEMATICA
f[p_, e_] := (e+1)*(e+2)/2; d3[1] = 1; d3[n_] := Times @@ f @@@ FactorInteger[n]; Select[Range[10^5], d3[#] == d3[#+1] && Sort[FactorInteger[#][[;; , 2]]] != Sort[FactorInteger[#+1][[;; , 2]]] &]
CROSSREFS
KEYWORD
nonn
AUTHOR
Amiram Eldar, Mar 06 2020
STATUS
approved