OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..1000
EXAMPLE
5642 = 2 * 7 * 13 * 31 is a term since 5642^2/(2^2 + 7^2 + 13^2 + 31^2) = 26908 is an integer.
MATHEMATICA
Select[Range[10^6], CompositeQ[#] && SquareFreeQ[#] && Divisible[#^2, Plus @@ (FactorInteger[#][[;; , 1]]^2)] &]
CROSSREFS
KEYWORD
nonn
AUTHOR
Amiram Eldar, Feb 21 2020
STATUS
approved