A134606 Numbers such that the square root of the sum of squares of their prime factors is a nonprime integer.
16, 81, 351, 512, 625, 1080, 1260, 1350, 1375, 1792, 1836, 2070, 2145, 2175, 2401, 2730, 2772, 3510, 4104, 4305, 4625, 4650, 4655, 4998, 5880, 6000, 6545, 7098, 7182, 7791, 7889, 7956, 9030, 9108, 9295, 9324, 10098, 10368, 10545, 11628, 11935, 12096
Offset: 1
Keywords
Examples
a(3)=351, since 351=3*3*3*13 and sqrt(3*3^2+13^2)=sqrt(196)=14.
Links
- Hieronymus Fischer, Table of n, a(n) for n = 1..10000
Crossrefs
Programs
-
Mathematica
f[{a_,b_}]:=Table[a,b];Select[Range[2,12096],!PrimeQ[Sqrt[Total[Flatten[f/@FactorInteger[#]]^2]]]&&IntegerQ[Sqrt[Total[Flatten[f/@FactorInteger[#]]^2]]]&] (* James C. McMahon, Apr 09 2025 *)
Comments