%I #10 Nov 01 2019 22:21:55
%S 425,521,545,569,594,614,626,629,650,689,701,725,729,734,761,774,794,
%T 801,809,810,845,846,854,857,866,881,909,914,926,929,941,950,953,965,
%U 974,986,989,990,1001,1025,1026,1034,1041,1046,1049,1053,1062,1070,1074
%N Numbers which can be expressed as an ordered sum of 3 squares in 9 or more different ways.
%H Robert Price, <a href="/A294714/b294714.txt">Table of n, a(n) for n = 1..75991</a>
%t Select[Range[882], Length[PowersRepresentations[#, 3, 2]] >= 9 &]
%Y Cf. A000164, A094942, A124966, A124967, A124968.
%K nonn
%O 1,1
%A _Robert Price_, Nov 07 2017
%E Updated Mathematica program to Version 11. by _Robert Price_, Nov 01 2019