A025378 Numbers that are the sum of 4 distinct nonzero squares in exactly 3 ways.
78, 102, 110, 114, 130, 135, 147, 156, 159, 171, 175, 177, 189, 191, 194, 201, 204, 205, 211, 221, 228, 233, 235, 237, 247, 252, 265, 271, 277, 281, 284, 312, 316, 340, 341, 348, 349, 353, 367, 397, 404, 408, 433, 440, 456, 508, 520, 624, 652, 748, 776, 816, 892, 912
Offset: 1
Keywords
Crossrefs
Cf. A025387.
Programs
-
Mathematica
With[{upto=950},Select[Union[Transpose[Select[Tally[Total/@ Subsets[ Range[ Ceiling[ Sqrt[upto-14]]]^2,{4}]],Last[#]==3&]][[1]]], #<=upto&]] (* Harvey P. Dale, Sep 08 2011 *)
Formula
{n: A025443(n) = 3}. - R. J. Mathar, Jun 15 2018