OFFSET
0,1
EXAMPLE
a(3)=479, because 479^3 = 47^3 + 350^3 + 406^3 = 109^3 + 293^3 + 437^3 = 256^3 + 311^3 + 398^3 and no prime less than 479 has 3 solutions.
MATHEMATICA
a = Table[SelectFirst[Table[{p, Length@Select[PowersRepresentations[p^3, 3, 3], #[[1]] > 0 &]}, {p, Prime@Range@200}], #[[2]] == k &], {k, 0, 6}]
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Zhining Yang, Dec 28 2024
EXTENSIONS
a(11) from Jinyuan Wang, May 31 2025
a(12) from Chai Wah Wu, Jun 03 2025
a(13)-a(15) from Chai Wah Wu, Jun 04 2025
a(16) from Chai Wah Wu, Jun 10 2025
STATUS
approved