A095812 Greatest number, not divisible by 4, having exactly n partitions into three positive squares.

793, 1885, 3763, 6307, 13843, 16003, 21547, 34483, 48427, 54763, 85507, 90787, 111763, 103387, 166147, 137083, 222643, 211843, 289963, 253507, 296587, 319867, 462883, 375523, 393187, 546067, 502483, 532123, 615883, 590947, 662803, 991027, 703123, 958483

Offset: 1

Author

T. D. Noe, Jun 07 2004

Keywords

• nonn

Comments

These are conjectured values. The Mathematica program checks numbers up to 10^6.

Links

• Donovan Johnson, Table of n, a(n) for n = 1..200 (checked up to 10^8)

Crossrefs

Cf. A025414 (least sum of 3 nonzero squares in exactly n ways).

Programs

Mathematica

lim=1000; nLst=Table[0, {lim^2}]; Do[n=a^2+b^2+c^2; If[n>0 && n0&]], {k, 30}]