OFFSET
1,2
COMMENTS
Numbers having only squarefree exponents larger than 1 in their canonical prime factorization.
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
FORMULA
Sum_{n>=1} 1/a(n) = Product_{p prime} (1 + Sum_{k>=2} 1/p^A005117(k)) = 1.83094143519375852659... .
MATHEMATICA
seq[lim_] := Select[Union[Flatten[Table[i^2*j^3, {j, 1, Surd[lim, 3]}, {i, 1, Sqrt[lim/j^3]}]]], AllTrue[FactorInteger[#][[;; , 2]], SquareFreeQ] &]; seq[2000]
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Amiram Eldar, May 28 2025
STATUS
approved
