%I #15 May 03 2020 15:15:53

%S 142,158,162,165,182,183,195,206,207,214,215,218,226,239,243,245,259,

%T 260,262,263,289,298,299,300,301,317,324,329,331,337,355,364,372,373,

%U 389,409,428,436,452,461,484,532,548,556,568,580,632,648,728,824,856,872,904

%N Numbers that are the sum of 4 distinct nonzero squares in exactly 4 ways.

%H Harvey P. Dale, <a href="/A025379/b025379.txt">Table of n, a(n) for n = 1..100</a>

%H <a href="/index/Su#ssq">Index entries for sequences related to sums of squares</a>

%F {n: A025443(n) = 4}. - _R. J. Mathar_, Jun 15 2018

%t With[{nn=40},Select[Union[Select[Tally[Total/@Subsets[Range[nn]^2,{4}]], #[[2]] == 4&][[All,1]]],#<=nn^2-14&]] (* _Harvey P. Dale_, May 03 2020 *)

%Y Cf. A025388, A025360.

%K nonn

%O 1,1

%A _David W. Wilson_