A122699 Least integer that can be written as a sum of 3 squares in n nontrivial ways (ignoring order and signs).
7, 0, 9, 41, 81, 146, 194, 306, 369, 425, 594, 689, 866, 1109, 1161, 1154, 1361, 1634, 1781, 1889, 2141, 2729, 2609, 3626, 3366, 3566, 3449, 3506, 4241, 4289, 4826, 5066, 5381, 7034, 5561, 6254, 7229, 7829, 8186, 8069, 8126, 8609, 8921, 8774, 10386
Offset: 0
Keywords
Examples
a(4)=81 since it can be written as 0^2+0^2+9^2, 1^2+4^2+8^2, 3^2+6^2+6^2, 4^2+4^2+7^2.
Links
- Wouter Meeussen, Table of n, a(n) for n = 0..112
Crossrefs
Cf. A117609.
Programs
-
Mathematica
Needs["NumberTheory`NumberTheoryFunctions`"]; Flatten[Position[Table[Length@SumOfSquaresRepresentations[3,n], {n,0,65000}],#,1,1]-1]& /@ Range[0,120]
Comments