OFFSET
1,1
COMMENTS
LINKS
Michael De Vlieger, Table of n, a(n) for n = 1..10000
EXAMPLE
Table of n, a(n) for select n:
n a(n)
-----------------------------------------------------------
1 s(1) = 72 = 2^3 * 3^2 = t(2)
14 s(14) = 1125 = 3^2 * 5^3
20 s(21) = 1944 = 2^3 * 3^5
46 s(53) = 8575 = 5^2 * 7^3
78 s(100) = 21600 = 2^5 * 3^3 * 5^2 = t(3)
102 s(137) = 36000 = 2^5 * 3^2 * 5^3
110 s(151) = 42336 = 2^5 * 3^3 * 7^2
119 s(165) = 48600 = 2^3 * 3^5 * 5^2
169 s(251) = 98784 = 2^5 * 3^2 * 7^3
174 s(258) = 104544 = 2^5 * 3^3 * 11^2
293 s(490) = 324000 = 2^5 * 3^4 * 5^3
4631 s(14728) = 190512000 = 2^7 * 3^5 * 5^3 * 7^2 = t(4)
MATHEMATICA
nn = 10^4; fQ[x_] := CoprimeQ @@ FactorInteger[x][[All, -1]]; Rest@ Union@ Flatten@ Table[If[fQ[#], #, Nothing] &[a^2*b^3], {b, Surd[nn, 3]}, {a, Sqrt[nn/b^3] } ]
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Michael De Vlieger, Mar 06 2026
STATUS
approved
