login
Numbers which can be expressed as an ordered sum of 3 squares in 9 or more different ways.
1

%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