OFFSET
1,1
LINKS
Michael De Vlieger, Table of n, a(n) for n = 1..10000
MATHEMATICA
Select[Range[2, 242, 2], Nor[PrimePowerQ[#], SquareFreeQ[#]] &]
CROSSREFS
KEYWORD
nonn
AUTHOR
Michael De Vlieger, May 19 2023
STATUS
approved