login
A294715
Numbers which can be expressed as an ordered sum of 3 squares in 10 or more different ways.
0
594, 626, 629, 689, 734, 761, 794, 801, 846, 854, 866, 881, 909, 914, 926, 929, 941, 950, 965, 986, 1001, 1025, 1026, 1034, 1041, 1046, 1049, 1089, 1097, 1106, 1109, 1121, 1125, 1130, 1154, 1161, 1169, 1181, 1190, 1193, 1205, 1206, 1209, 1214, 1226, 1229
OFFSET
1,1
MATHEMATICA
Select[Range[1229], Length[PowersRepresentations[#, 3, 2]] >= 10 &]
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert Price, Nov 07 2017
EXTENSIONS
Updated Mathematica program to Version 11, and corrected errors in Name. by Robert Price, Nov 01 2019
STATUS
approved