OFFSET
1,1
COMMENTS
For k>1: m*10^k are terms for squarefree numbers m coprime to 10.
If m is a term and coprime to 10 then also 10*m is a term.
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
Eric Weisstein's World of Mathematics, Squarefree.
MATHEMATICA
Select[Range[5000], (r = rad[#]) < # && SequenceCount @@ IntegerDigits[{#, r}] > 0 &] (* Amiram Eldar, Sep 07 2020 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Reinhard Zumkeller, May 19 2006
STATUS
approved